@ARGV and $ARGV[0] =~ /asdf/ and print;