【perl】perl正则表达

perl正则表达式

Perl语言的正则表达式功能非常强大，基本上是常用语言中最强大的，很多语言设计正则式支持的时候都参考Perl的正则表达式。

Perl的正则表达式的三种形式，分别是匹配，替换和转化:

• 匹配：m//（使用 m// 进行模式匹配，可以省略 m，只使用 //）

• 替换：s///

• 转化：tr///

这三种形式一般都和 =~ 或 !~ 搭配使用， =~ 表示相匹配，!~ 表示不匹配。

#!/usr/bin/perl
 
$bar = "I am runoob site. welcome to runoob site.";
if ($bar =~ /run/) {
   print "第一次匹配\n";
} else {
   print "第一次不匹配\n";
}
 
$bar = "run";
if ($bar =~ /run/) {
   print "第二次匹配\n";
} else {
   print "第二次不匹配\n";
}

输出：

第一次匹配
第二次匹配

 

模式匹配有一些常用的修饰符，如下表所示：

修饰符	描述
i	忽略模式中的大小写
m	多行模式
o	仅赋值一次
s	单行模式，"."匹配"\n"（默认不匹配）
x	忽略模式中的空白
g	全局匹配
cg	全局匹配失败后，允许再次查找匹配串

perl处理完后会给匹配到的值存在三个特殊变量名:

• $`: 匹配部分的前一部分字符串
• $&: 匹配的字符串
• $': 还没有匹配的剩余字符串

如果将这三个变量放在一起,你将得到原始字符串。

 

#!/usr/bin/perl
 
$string = "welcome to runoob site.";
$string =~ m/run/;
print "匹配前的字符串: $`\n";
print "匹配的字符串: $&\n";
print "匹配后的字符串: $'\n";

输出：

匹配前的字符串: welcome to 
匹配的字符串: run
匹配后的字符串: oob site.

 

模式替换：使用 s/// 进行字符串替换。

my $string = "Hello, world!";
$string =~ s/world/Perl/;
print "$string\n";  # 输出 "Hello, Perl!"

在这个示例中，正则表达式 s/world/Perl/ 将字符串 $string 中的 world 替换为 Perl。

全局替换：使用修饰符 g 进行全局替换，即替换所有匹配项。

my $string = "Hello, world! world!";
$string =~ s/world/Perl/g;
print "$string\n";  # 输出 "Hello, Perl! Perl!"

 

模式翻译：使用 tr/// 或 y/// 进行字符翻译

my $string = "Hello, world!";
$string =~ tr/a-z/A-Z/;
print "$string\n";  # 输出 "HELLO, WORLD!"

捕获匹配：使用捕获组 () 提取匹配的子字符串。

my $string = "Hello, world!";
if ($string =~ /(world)/) {
    print "捕获的子字符串：$1\n"; # s输出: word
}

更多正式表达式：

.	匹配除换行符以外的所有字符
x?	匹配 0 次或一次 x 字符串
x*	匹配 0 次或多次 x 字符串,但匹配可能的最少次数
x+	匹配 1 次或多次 x 字符串,但匹配可能的最少次数
.*	匹配 0 次或多次的任何字符
.+	匹配 1 次或多次的任何字符
{m}	匹配刚好是 m 个 的指定字符串
{m,n}	匹配在 m个 以上 n个 以下 的指定字符串
{m,}	匹配 m个 以上 的指定字符串
[]	匹配符合 [] 内的字符
[^]	匹配不符合 [] 内的字符
[0-9]	匹配所有数字字符
[a-z]	匹配所有小写字母字符
[^0-9]	匹配所有非数字字符
[^a-z]	匹配所有非小写字母字符
^	匹配字符开头的字符
$	匹配字符结尾的字符
\d	匹配一个数字的字符,和 [0-9] 语法一样
\d+	匹配多个数字字符串,和 [0-9]+ 语法一样
\D	非数字,其他同 \d
\D+	非数字,其他同 \d+
\w	英文字母或数字的字符串,和 [a-zA-Z0-9_] 语法一样
\w+	和 [a-zA-Z0-9_]+ 语法一样
\W	非英文字母或数字的字符串,和 [^a-zA-Z0-9_] 语法一样
\W+	和 [^a-zA-Z0-9_]+ 语法一样
\s	空格,和 [\n\t\r\f] 语法一样
\s+	和 [\n\t\r\f]+ 一样
\S	非空格,和 [^\n\t\r\f] 语法一样
\S+	和 [^\n\t\r\f]+ 语法一样
\b	匹配以英文字母,数字为边界的字符串
\B	匹配不以英文字母,数值为边界的字符串
a|b|c	匹配符合a字符 或是b字符 或是c字符 的字符串
abc	匹配含有 abc 的字符串 (pattern) () 这个符号会记住所找寻到的字符串,是一个很实用的语法.第一个 () 内所找到的字符串变成 $1 这个变量或是 \1 变量,第二个 () 内所找到的字符串变成 $2 这个变量或是 \2 变量,以此类推下去.
/pattern/i	i 这个参数表示忽略英文大小写,也就是在匹配字符串的时候,不考虑英文的大小写问题. \ 如果要在 pattern 模式中找寻一个特殊字符,如 "*",则要在这个字符前加上 \ 符号,这样才会让特殊字符失效

 

参考资料

1. Perl 正则表达式