if ($string !~ /keyword/) { print "match failed"; }