Help for this page
unless ( grep{$test1 eq $_} @accepted1 && grep{$test2 eq $_} @accepted +2) {
print "you had test1: $test1<br>"; foreach(@test1) { print "$_<br>"; } print "<br>you had test2: $test2<br>"; foreach(@test2) { print "$_<br>"; }