{ local $^I = ".bak"; local *ARGV; @ARGV = ".fetchmailrc"; while (<>) { s/^(here)/$username\n$1/i; print; } }
-- Randal L. Schwartz, Perl hacker
In reply to •Re: Editing Files In Place
by merlyn
in thread Editing Files In Place
by gnubbs
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |