if(@ARGV and $ARGV[0] =~ /asdf/){ print; }