if($l =~ /\Q$m\E/)
  {
     print "We matched\n";
     print OF "$$l";
  }