Perl脚本中特定split语句用法解析及语法疑问求助

你觉得这条语句不符合split常规语法，其实它完全符合Perl的语法规范，下面拆解一下：

1. Perl split函数的合法语法形式 #

Perl的split函数常用形式之一就是：

split /正则模式/, 待分割字符串;

这里的正则模式用//包裹，后面紧跟要分割的目标字符串，省略了第三个可选参数（分割次数限制，默认会分割所有匹配的位置）。

2. 这条语句的具体拆解 #

• 正则模式/ \(/：匹配的是空格+左括号的组合。因为左括号(在正则表达式里是特殊分组字符，所以用反斜杠\转义，让它表示字面意义的左括号。
• 修饰符ig：
  • i：忽略大小写，但这里匹配的是空格和括号，大小写不影响，属于代码里的冗余写法，但不干扰功能；
  • g：全局匹配，不过split本身就是全局分割所有匹配位置，这个修饰符在这里其实是多余的，但加了也不会报错。
• 整体作用：把$orig_content这个字符串，按照 (（空格加左括号）的位置分割成数组，结果存到@splitEachJudge里。

结合你提供的代码片段来看 #

当前代码里$orig_content的值是"Andrew and Alvin"，里面没有 (这个组合，所以分割后数组只有一个元素（就是原字符串），此时数组最后一个索引$#splitEachJudge是0，会走代码里的elsif ($#splitEachJudge eq "0")分支。

内容的提问来源于stack exchange，提问作者Eugene