if ($entry =~ /\Q$ARGV[0]\E/ && $entry =~ /\Q$ARGV[1]\E/) { # Do something }