in reply to help with a function that will cut out redundancy across two lists
List::Compare does that and more:
use List::Compare; use Data::Dumper; @Llist = qw(abel abel baker camera delta edward fargo golfer); @Rlist = qw(baker camera delta delta edward fargo golfer hilton); $lc = List::Compare->new(\@Llist, \@Rlist); #Get those items which appear at least once in both lists (their inter +section). @intersection = $lc->get_intersection; print Dumper \@intersection;
Cheers,
Brent
-- Yeah, I'm a Delt.
|
---|
In Section
Seekers of Perl Wisdom