http://qs321.pair.com?node_id=354591


in reply to Grepping on array

You can also use List::Compare to do this sort of thing:
my @arr1 = qw(a b c d e f g h); my @arr2 = qw(d a e); my @result = List::Compare->new(\@arr1, \@arr2)->get_Lonly; # @result = qw(b c f g h);