Hi Bob
In general a hash is the way to go:
my @list1 = qw ( Apple Orange Lemon Tangerine Grape );
my @list2 = qw( Apple Tangerine Grape Banana );
my %list1 = map {($_ => 1) } @list1;
my @list3 = grep {$list1{$_}} @list2;
print "@list3";
output:
Apple Tangerine Grape
HTH,
Rob
"Bob Williams" <[EMAIL PROTECTED]> wrote in message
003101c2b7df$59f7d780$[EMAIL PROTECTED]">news:003101c2b7df$59f7d780$[EMAIL PROTECTED]...
I have two lists.
List 1 is the control list containing: Apple, Orange, Lemon, Tangerine, and
Grape.
List 2 contains Apple, Tangerine, Grape, and Banana.
I need a script that compares the two lists and will eliminate banana from
list 2 because banana is not in the control List 1. The script will not add
Orange to List 2 even tho it is in the Control List 1.
Perhaps the script would create list 3 with the results (Apple, Tangerine,
and Grape)?
Thanks
Bob Williams
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]