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