@list = map { $c = $_; $c =~ s/\s+/_/g; $c } @d = grep { /\d/ } <FH>;

Is there a way to shorten the following mostly concerned with why I
have to use a temporary variable.

Thanks.

--
Rodrick R. Brown
http://www.rodrickbrown.com

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


Reply via email to