31 Oct
2007
31 Oct
'07
1:10 a.m.
On 10/30/07, mlondon mlondon@sprynet.com wrote:
I would like to be able to FIND a string and move it up or down in the file.
Pipe the document through:
perl -ne 'BEGIN{$"=undef}push(@hold, $_) if /^NOTE/../^X-Palm/; print unless @hold; if (/^X-Palm/) {pop @hold; print "$_@hold"; @hold=()}'
j.