You need to reread perldoc perlre. You've got a negated character class that's looking for one character that's not one of the ones listed. What you're really wanting is !~ to negate the sense of the search.