unless ( grep { print "$item eq $_? ", $item eq $_, "\n"; $item eq $_; } @skipper ) { # not found in list? print "skipper is missing $item.\n"; }