if ( $thestring =~ /\b$thecheck\b/ ) ...