in reply to how to find all lines which do not start with something
with grep:foreach my $line (@lines) { next if $line =~ /^QKC_/; #do something with $line }
@subset = grep(/^QKC_/, @lines);
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: how to find all lines which do not start with something
by ikegami (Patriarch) on Sep 16, 2004 at 14:26 UTC |