On Sun, 29 Sep 2002 18:38:04 +0200 Aristoteles Pagaltzis <[EMAIL PROTECTED]> wrote:
> * Vladi Belperchinov-Shabanski <[EMAIL PROTECTED]> [2002-09-29 18:25]: > > #!/usr/bin/perl -p > > $_='' if !/\S/ && $e; # i.e. don't print if empty and last one was empty > > $e = !/\S/; # remember if last one is empty... > > Since you have already done $_='' in the first line, you > don't need a regex in the second to set $e. You can just say > > $e = !$_; line `0' will fail this test, though it is not empty line... P! Vladi. -- Vladi Belperchinov-Shabanski <[EMAIL PROTECTED]> <[EMAIL PROTECTED]> <[EMAIL PROTECTED]> http://www.biscom.net/~cade http://cade.webbg.com Now, sure as the sun will cross the sky, This lie is over Lost, like the tears that used to tide me over...
