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:重新运行