if(($#ARGV!=0) || (! $ARGV[0]) || (unless( grep $ARGV[0] eq $_, @arr ))) {
...