in reply to grepping
No grep required.
my %h; @h{@data2} = (); delete @h{@data}; my @ids = keys %h;
|
---|
In Section
Seekers of Perl Wisdom
in reply to grepping
my %h; @h{@data2} = (); delete @h{@data}; my @ids = keys %h;
|
---|