>>>>> "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

uri

-- 
Uri Guttman  ------  [EMAIL PROTECTED]  -------- http://www.stemsystems.com
----- Stem and Perl Development, Systems Architecture, Design and Coding ----
Search or Offer Perl Jobs  ----------------------------  http://jobs.perl.org

Reply via email to