> I would like to create a unique list.
Buy the Cookbook or search the archives, since this is a common
question. Basically one of the following two solutions is best.
%seen = ();
@unique = grep { not $seen{$_}++ } @list_A, @list_B;
OR:
%seen = ();
$seen{$_}++ for @list_A, @list_B;
@unique = keys %seen;
I think you'll agree they are simplier than your code!
Jonathan Paton
__________________________________________________
Do You Yahoo!?
Everything you'll ever need on one web page
from News and Sport to Email and Music Charts
http://uk.my.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
