Editing file

[Martin Spinassi]

Hi list!

I've just started with perl, but I'm really excited about its power.

I'm trying to edit a file, but couldn't find out how to do it without
making a temp file. I've been searching for the solution, but all I find
is how to do it from command line, adding a "-i" to the execution.

My script dump some database structures to files, each file for each
table, and then I want to edit those files, but couldn't make the
edition infile, and do not want to duplicate files for just editing them
(using $^I).

Is there any way to open a file for input and output at the same time?

This is just and example, and doesn't work, but may be it explains
better what I'm trying to do:


while (glob "*.dump") {        #I know there is not a "<>" 
       open (TMPFILE,"<&>", $_) or die "Could not open file $_: $!\n";

       while (<TMPFILE>) {
                s/^--.*//;
                print;
        }
}




Cheers


Martín


-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/