Re: Removing blank lines

[Grant]

> >   while( <SOCK> ) {
> >     push @out, $_ if /\S/;
> >   }
snip
> Is that better than:
>
> push @out, $_ unless /^\s*$/;
snip

They are functionally equivalent, but (at least on the version of perl
I have) /\S/ is faster:

Ok, I'll switch.  Thanks.

- Grant

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/