Message-ID: <
20030111191832.GA19441@londo.c47.org>
p4raw-id: //depot/perl@18489
As shown above, Perl creates the backup file whether or not any output
is actually changed. So this is just a fancy way to copy files:
- $ perl -p -i '/some/file/path/*' -e 1 file1 file2 file3...
+ $ perl -p -i'/some/file/path/*' -e 1 file1 file2 file3...
or
- $ perl -p -i '.orig' -e 1 file1 file2 file3...
+ $ perl -p -i'.orig' -e 1 file1 file2 file3...
You can use C<eof> without parentheses to locate the end of each input
file, in case you want to append to each file, or reset line numbering