if($string =~ m/x.m.l./)
{
   ...
}