if ($regex1 =~ m/\Q$regex2/)