if ($row=~ /$m$names[$k]$m$/g))