if (! $string =~ /asdfasdf/) { ... }