if(grep($username =~ m/\b$_\b/, @ignore)) { print "That didn't quite work"; }