if($thestring =~ /(?<![^,])$thecheck(?![^,])/) { ... }