in reply to duplicate $_ while reading files; my compactness; code structure

It won't be as pretty as, say, Randal's, but whatever...

@code_only=grep {/./} (@everything=map {/^([^#]*)/} <INPUT>);

=cut
--Brent Dax
There is no sig.

  • Comment on Re: duplicate $_ while reading files; my compactness; code structure
  • Download Code

In Section Seekers of Perl Wisdom