>>>>> "AP" == Aristoteles Pagaltzis <[EMAIL PROTECTED]> writes:

  AP> * Smylers <[EMAIL PROTECTED]> [2002-09-30 14:19]:
  >> #! /usr/bin/perl -00p
  >> __END__

  AP> You also don't need to write a script for that:

  AP> $ perl -00pe1 filename

  AP> would do. However, it doesn't fulfill the spec of regarding
  AP> lines with only whitespace as empty.

untested but looks ok:

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