@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/