浅显讲解perl的模式匹配

perl 接触的还不是很多，就把最近用到的匹配相关整理一下，拿出来分享一下。

首先介绍也关于perl字符串匹配的两个运算符

=~ 匹配成功返回true，失败返回false

!~ 不匹配成功返回true，失败返回false

for example :

my $testString = "hello world";
if ($testString =~ /hello/) {
  print "true\n";
} else {
  print "false\n";
}

 

匹配的字段需要用/xxx/包含起来，在里面可以放想匹配的字符串或者是正则表达式。

 

perl的正则表达式使用传统型NFA引擎 （参考百度百科：http://baike.baidu.com/view/94238.htm?fr=aladdin）

学习正则表达式有一个不错的文章可以推荐：30分钟入门正则表达式

当然，想30分钟入门似乎还是不够的~

这篇文章介绍了正则的一些基本语法，30分钟只够记一记，如果平时使用的比较多，慢慢便会熟练运用了。

使用正则匹配的简单例子:

 

my $testString = "hello123 world";
if ($testString =~ /(\d{3})/) {
  print "$1\n";
} else {
  print "false\n";
} 

 

\d 指 匹配数字， {3} 指匹配3次。

 

需要注意的是\d在有些语言的正则匹配中不支持，这个时侯使用[0-9]能达到同样的效果。

perl在匹配中用括号括起来的时候，会将匹配到的项分配到一个内存里

这个时候可以使用$1去表示第一个括号内的数据，然后有多个括号的时候可以采用$2...$3...

还有 $&, &`, &' 可以用来表示匹配项，匹配的前一部分字符串和匹配的后一部分字符串

可以再举个例子来看一下：

 

my $testString = "hello123 world234a";
while ($testString =~ /(\d{3})/g) {
  print "$&\n";
  print "$`\n";
  print "$'\n";
}

想一下打印出来的数据会是什么？

 

在这里例子当中又看到了在模式匹配后面跟了一个g，这玩意叫做模式匹配选项。

选项	描述
g	匹配所有可能的模式
i	忽略大小写
m	将串视为多行
o	只赋值一次
s	将串视为单行
x	忽略模式中的空白

 

其实我也就用用g和i比较多一些~

既然提到了g，那就需要在提一下匹配中的查找替换操作了。

比如想要把hello world 中的world 替换成 hello perl 那可以这样写

 

$testString = "hello world";
$testString =~ s/world/perl/g;
print "$testString\n";

 

查找替换的格式就是 string1 =~ s/想要查找的字段/替换的字段/g

 

g就表示把所有匹配的字段都替换掉，当然除了s 还可以使用这些

选项	描述
c	翻译所有未指定字符
d	删除所有指定字符
s	把多个相同的输出字符缩成一个

不过我就使用了s， 即便是删除我也习惯用 s/查找字段//g 这样的方式替换成空的。

暂时就先整理这些，有不正确的地方麻烦指出来，谢谢。