Jeroen/usr/bin/perl -i.bak @pars= split /\n\n/, join '', <>; for( @pars ){ next if /pattern1/; print $newpara if /pattern2/; print; print "\n\n"; }
In reply to Re: Editing file
by jeroenes
in thread Editing file
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |