while (<>) {
        print unless /^$/;
}


------------------------------
James Schappet
Schappet.com


On Thu, 15 Aug 2002, Craig Sharp wrote:

> I have a simple question but I have brain lock.
>
> I need to parse a file and remove all blank lines from the file.
>
> Thanks,
>
> Craig
>
> _______________________________________________
> Perl-Unix-Users mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>

_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to