note dorko [module://List::Compare] was built for working with two, three or more arrays at once.<P> <c> use List::Compare; my @Llist = ('A','B','C','D','E'); my @Rlist = ( 'D','E','F','G','H','I','J'); my $lc = List::Compare->new(\@Llist, \@Rlist); # If I read your post correctly, # this is what you want. my @LorRonly = $lc->get_symmetric_difference; print join ", ", @LorRonly; # Also does... my @intersection = $lc->get_intersection; my @union = $lc->get_union; # And much, much more.</c> Output:<P> <c>A, B, C, F, G, H, I, J</c> <P> Cheers,<P> Brent<BR> <div class="pmsig"><div class="pmsig-10261"> <I>-- Yeah, I'm a <A HREF="http://www.delts.org/">Delt</A>.</I> </div></div> 599277 599277