Perl正则表达式完全指南：匹配、替换与转换

需积分: 13 26 浏览量更新于2024-07-17 收藏 967KB PDF 举报

"这篇学习资料详细讲解了Perl语言中的正则表达式，摘自《Perl编程详解》。文章涵盖了正则表达式的八大原则，并介绍了匹配、替换和转换三种形式的正则表达式及其使用方法。此外，还提到了正则表达式修饰符以及相关的操作示例。" Perl正则表达式是Perl编程中处理字符串的强大工具，其灵活性和功能强大深受程序员喜爱。这篇讲解详细阐述了以下几个方面： 1. **八大原则**：虽然具体内容未列出，但通常这些原则可能包括正则表达式的模式匹配规则、特殊字符的使用、量词的应用、分组和后向引用等。 2. **匹配**：使用`m/<regexp>/`或者简化的`/<regexp>/`形式，将正则表达式应用于左侧的标量，判断是否匹配。`=~`和`!~`运算符用于绑定标量并执行匹配或不匹配检查。 3. **替换**：`s/<regexp>/<substituteText>/`用于替换匹配的部分，用`<substituteText>`替换`<regexp>`找到的内容。同样，省略`s`是语法上的简化。 4. **转换**：`tr/<charClass>/<substituteClass>/`用于批量替换字符，从`<charClass>`集合中的字符转换为`<substituteClass>`集合中的对应字符。这个操作并不严格是正则表达式，但在处理特定数据格式时非常有用。 5. **正则表达式修饰符**：如`i`忽略大小写，`g`全局匹配，`m`多行模式等，这些修饰符可以改变正则表达式的匹配行为。 6. **示例**：文中提供了多个示例，展示了如何使用正则表达式进行替换操作，并返回替换成功与否的结果。例如，`$scalar =~ s/a/b;`会将变量`$scalar`中的所有`a`替换为`b`，如果替换成功则返回真。这些知识点对于理解和使用Perl正则表达式进行文本处理至关重要。了解和掌握这些内容，能够帮助开发者在处理字符串时更加高效和灵活。

每次对正则表达式求值时会得到：

．指示正则表达式匹配字符串的次数(结果状态)。

．如果希望保存部分匹配，则有—系列称为反向引用的变量。

接下来让我们依次学习他们：

1．结果状态

结果状态表示正则表达式匹配字符的次数。得到结果状念的方法是在标量环境下求正则

表达式的值。以下所有例子使用了这—结果变量。

$pattern = ' simple always simple';

$pattern = ' simple always simple';$pattern = ' simple always simple';

$pattern = ' simple always simple';

$result = ($pattern =~ m"simple");

$result = ($pattern =~ m"simple"); $result = ($pattern =~ m"simple");

$result = ($pattern =~ m"simple");

这里，result 为1，因为模式 simple 位于 simple always simPle 中。同样的，给定 simple

always simple：

$result = ($pattern =~ m" complex");

$result = ($pattern =~ m" complex"); $result = ($pattern =~ m" complex");

$result = ($pattern =~ m" complex");

将使 result 为空，因为 complex 不是 simple always simple 的子字符串，接着：

$result = ($pattern =~ s" simple" complex");

$result = ($pattern =~ s" simple" complex"); $result = ($pattern =~ s" simple" complex");

$result = ($pattern =~ s" simple" complex");

使 result 为 1，因为把 simple 替换为 complex 成功了。更进一步：

$pattern = ' simple simple';

$pattern = ' simple simple'; $pattern = ' simple simple';

$pattern = ' simple simple';

$result = ($pattern =~ s" simple" complex" g);

$result = ($pattern =~ s" simple" complex" g); $result = ($pattern =~ s" simple" complex" g);

$result = ($pattern =~ s" simple" complex" g);

情况变得更复杂。在这里，$result 为 2，因为在 simple always simple 中 simple 出现

两次，同时正则表达式的 g 修饰符被使用，这意味着“匹配尽可能多的次数”。(要更详细材

料参看本章后面的修饰符)。同样地：

$pattern = ' simple still';

$pattern = ' simple still'; $pattern = ' simple still';

$pattern = ' simple still';

if ($pat

if ($pat if ($pat

if ($pattern =~ m" simple")

tern =~ m" simple")tern =~ m" simple")

tern =~ m" simple")

{

{ {

{

print " MATCHED!

print " MATCHED! print " MATCHED!

print " MATCHED!\

\n";

n";n";

n";

}

} }

}

在 if 子句中使用$pattern =~ m" simple"，而该子句基本上告诉 Perl，如果模式$pattern

包含有子串 simple 则打印 Matched! 。

2．反向引用

反向引用有点复杂。假定想保存一些匹配供后用，那么为达到该目的，Perl 有一个运算

符(圆括号())，该运算符可用于包围读者希望匹配的一系列给定的字符。

在正则表达式中用圆括号括住某模式就是告诉解释器“嗨，我希望保存那个数据。”

Perl 解释器再应请求，且将查找到的匹配保存在一系列特珠的变量中($1,$2,$3…$65536)，

这些变量可用来查询第一个、第二个、第三个等等圆括号匹配，这些变量于是可以通过查看

相应的变量或在数组环境下对正则表达式进行求值而且进行访问。例如：

$text = " this matches ' THIS' not 'THAT' ";

$text = " this matches ' THIS' not 'THAT' "; $text = " this matches ' THIS' not 'THAT' ";

$text = " this matches ' THIS' not 'THAT' ";

$text =~ m" ('TH..' )";

$text =~ m" ('TH..' )"; $text =~ m" ('TH..' )";

$text =~ m" ('TH..' )";

print " $1

print " $1 print " $1

print " $1\

\n";

n";n";

n";

在这里，字柳 HIS 被打印出来 —— Perl 已经将它们保存在$1中，以后再打印$1。然

而，该例子揭示了更多内容，例如：

1)通配符(字符点(.)匹配任意字符)。如果 THIS 不在字符串中，模式(TH..)将欣然匹配

THAT。

2)正则表达式匹配一行上出现的第一处模式。THIS 因为首先出现，所以被匹配。同时，

按缺省 regexp 行为，THIS 将总是被匹配的第一个字符串。(可以用修饰符改变缺省值，详细

剩余27页未读，继续阅读

weixin_38669628

粉丝: 387
资源: 6万+

Perl正则表达式完全指南：匹配、替换与转换

perl源代码，供学习参考

PERL脚本实例代码

ff.rar_Boost_正则表达式

Perl正则表达式讲解

perl正则表达式讲解

Perl正则表达式详细讲解：匹配、替换和转换

理解PCRE：Perl兼容正则表达式详解

Perl正则表达式讲解.chm

PHP中基于perl的正则表达式处理函数

perl 正则表达式

最新资源