怎么用m!在Perl正则表达式

我第一次学习Perl和正则表达式,所以如果这是一个愚蠢的问题,我道歉.我一直在寻找自己的答案,但找不到任何东西.也许我的一部分问题是我真的不知道它叫什么.

我遇到了一段看起来像这样的代码:

$xl_file = "$curr_dir/$xl_file" unless $xl_file =~ ( m!(^[a-z]:)|[/\\]!i );

当我查看=〜运算符时,我潜入正则表达式洞并开始了解它.但我只看过"m //"匹配运算符.我假设"我!" 是另一种匹配运算符,但我找不到任何解释它如何工作的引用.通过实验,我发现在使用它时需要"!i",但这与我能想出的一样多......

有人可以向我解释一下,或者指出一些(免费)材料的方向可以吗？

1> Rohit Jain..：

---

使用匹配运算符,您可以使用任何类型的分隔符,而不仅仅是/.

因此,以下所有匹配运算符都有效并执行相同的任务:

m//
m!!
m{}
m##

另请注意,如果您使用/分隔符,则可以m从头开始删除它.所以,/foo/有效,但!foo!不是.

---

@HunterMcMillen我不同意!更改分隔符在多种语言中很常见,而不仅仅是Perl.它实际上提高了可读性,因为这可以避免转义.参见`/ ^ http:\ /\//``与`m {^ http://}`

---

如果说维护者不能将`m ##`标识为正则表达式引用运算符,那么他真的不应该维护perl代码.