perl-正则表达式-区分大小写

Question

嗨，我有一些看起来像这样的文件：

some row
/folder1/folder2/folder3/folder4/folder5  *.kuku.* noku
/folder1/folder2/folder3/folder4/folder5  *.kuku noku 
another row
another row

如果第一行不存在，我需要添加它，如果第二行不存在，我只需要添加第二行

我写了正则表达式，但它们实际上不起作用：

if ($line =~ /(\*\.kuku\.\*\b)/) {do something}

if ($line =~ /(\*\.kuku\b)/) {do something else}

任何想法？ 谢谢

Answer 1

\\b仅在单词边界上匹配。 \\*\\.kuku\\.\\*\\b永远不会匹配，因为*不是单词字符。

您可以将其更改为\\s以便匹配空格。 \\*\\.kuku\\.\\*\\s