Uri Guttman wrote:
> 
> >>>>> "Y" == Yanick  <[EMAIL PROTECTED]> writes:
> 
> no one seems to have seen my earlier post on this so here it is again
> and it is much shorter.
> 
>   Y>   perl -pe'/\S/?($e=0):($e++and$_="")' filename
>        perl -0777pe's/^\s*\n/\n/m'          file
> 

This didn't work as is. It needs the global match modifier:
perl -0777pe's/^\s*\n/\n/mg' <file>

P

-- 

***********************************************
Peter Ensch,
[EMAIL PROTECTED]           A-1140   (214) 480 2333
***********************************************

Reply via email to