if ($row =~ m|\b$m$names[$k]$m\b| {...