On 3/13/07, Grant <[EMAIL PROTECTED]> wrote:
while( <SOCK> ) {
push @out, $_;
}
Can anyone show me how to regexp the blank lines out considering the above code?
Do you mean this?
while (<SOCK>) {
push @out, $_ unless /^\s*$/;
}
Or, what do you really mean by "blank"?
Hope this helps!
--Tom Phoenix
Stonehenge Perl Training
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
