Perl教程 第三课 第三节

Pattern matching and Regular Expression

分隔split

根据指定的分隔符拆开字符串，返回子串的列表。
语法规则： @list = split /separator/, $string
or @list = split(/separator/, $string)
这里separator是分隔符，string是分隔目标。
注意split会保留开头的空字段，并省略结尾的空字段。

• 实例

[3]中开头的空字符段保留，结尾的空字符段被省略。
[5]中splig字符的默认操作是split /\s+/, $_;

join函数

用于将数个字符串片段联合成一个字符串
语法：my $result = join $glue, @pieces;
my $result = joinn( $glue, @pieces);
$glue表示一个连接符，作用目标@pieces是一个数组

• 实例
  
  

其它

• 列表上下文中的m//
  一般情况下，模式匹配操作符m//返回的是布尔值，如果再列表上下文中使用m//，模式匹配成功时返回的是所有捕获变量的列表，匹配失败时返回空列表。/g修饰符可以用在m//操作符上。

s是空字符，因此S表示任意非空字符；在第二个撇配当中，由于@words后面属于列表上下文，因此$test当中的所有单词都被匹配到了列表当中，返回的是包含所有单词的数组。（如果是标量上下文，返回的是匹配的个数）

• 非贪婪量词
  贪婪量词：如+,,?,{m,n}等，会保证在整体匹配的前提下，尽量匹配长字符。
  非贪婪量词：对于每个贪婪量词，都有一个对应的非贪婪量词，在贪婪量词后面加上一个问号即可，如：
  +？，？，？？，{m,n}？等。
  非贪婪量词匹配的字符串是越短越好。？？会匹配零次或一次，但是会优先匹配零次。

• 命令行执行perl
  例子：

perl -p -i.bak -w -e 's/Randall/Randal/g' fred*.dat

-p：让perl自动生成小程序：while(<>) {print:}
-i.bak：告诉perl对原始文件做一个备份，后缀名为.bak
-w：打开warning
-e：告诉perl后面的是程序代码
通过这种方式可以在命令行中直接运行，而不需要新建一个脚本。

Debug 程序

用-d选项可以进入debug模式 ，debug模式下可以使用专门的命令。
p：打印变量
r：从子函数发挥
R：重新运行