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