匹配变量时perl正则表达式出现问题

Question

当我将它存储在变量中时，我必须匹配格式为Krait400.1C.28的字符串：

$string_to_match = "Krait400.1C.28"

foreach (@line)
{
  if($_ =~ /$string_to_match/i)
  {
    print "found";
  }
  else
  {
    print "notfound";
  }
 }

它不匹配。但如果我将$string_to_match替换为"Krait400.28.1C"则匹配。此外，还有其他字符串匹配，格式相同，如 xxxx.yy .1C，但我有一些问题，如"Krait400.28.1C"，它表现得非常奇怪

我已计算过角色，一切都一样，但我不知道为什么它不匹配！

请帮帮我！

Answer 1

对不起伙计们，这个错误不在正则表达式中，它是在第一个元素不匹配后调用的子程序中，然后它常常与其余部分不匹配。很难想象那个部分，因为它进入了我执行正则表达式的循环并且它不匹配那里！

对不起您的所有麻烦！

非常感谢您的投入！