in reply to My 'perldar' tells me there is a 'better' solution for this list operation

because there's more than several ways to do it.. 
my @l3 = map { my $f = $_; ((grep { $f eq $_ } @l2),'null')[0] } @l1;

[download]
  • Comment on Re: My 'perldar' tells me there is a 'better' solution for this list operation
  • Download Code

In Section Seekers of Perl Wisdom