note
toma
Here's a forward-looking approach:
<CODE>
use Quantum::Superpositions;
my @arr1= qw (two two three five four six six six seven);
my @arr2= qw (one one three four bee seven eight six);
my @intersection = eigenstates(any(@arr1) eq any(@arr2));
print "There are ",scalar(@intersection)," common elements\n";
print "Values: @intersection\n";
</CODE>
<I>It should work perfectly the first time! - toma</I>
264346
264346