unless ( grep{$test1 eq $_} @accepted1 && grep{$test2 eq $_} @accepted2) { #### print "you had test1: $test1
"; foreach(@test1) { print "$_
"; } print "
you had test2: $test2
"; foreach(@test2) { print "$_
"; }