Perl正则表达式详解：匹配、替换与转换

4星 · 超过85%的资源需积分: 17 194 浏览量更新于2024-07-26 收藏 955KB PDF 举报

"Perl正则表达式讲解摘自《Perl编程详解》" Perl正则表达式是Perl编程语言中强大的文本处理工具，它允许程序员高效地处理字符串匹配、替换和转换等任务。正则表达式在Perl中具有核心地位，理解和掌握正则表达式是成为熟练Perl程序员的关键。在Perl中，正则表达式遵循一系列的原则： 1. **原则1**：正则表达式用于匹配、替换和转换。匹配是检查字符串是否符合特定模式；替换是找到匹配的部分并用新文本替换；转换则是一次性替换一串字符。 2. **原则2**：正则表达式有两种主要的语法形式——匹配和替换。匹配使用`m/<regexp>/`，其中`<regexp>`是模式，可以省略`m`；替换使用`s/<regexp>/<substituteText>/`，`<substituteText>`是替换后的新文本，同样可省略`s`。 3. **原则3**：转换操作`tr/<charClass>/<substituteClass>/`用于批量替换字符，如将`[0-9]`中的所有数字替换为`9876543210`，并不严格属于正则表达式，但经常配合正则表达式使用。 4. **原则4**：正则表达式的匹配是通过`=~`和`!~`操作符绑定到标量变量上，用来判断字符串是否符合模式。`=~`表示匹配，`!~`表示不匹配，这两个操作符返回布尔值，表示匹配成功与否。 5. **原则5**：正则表达式还可以配合修饰符使用，如`g`全局匹配，使替换操作在整个字符串中执行多次，而非仅替换第一个匹配项。 6. **原则6**：修饰符可以改变正则表达式的行为，例如`i`使匹配变为不区分大小写，`m`使匹配多行模式等。 7. **原则7**：在匹配操作中，`<regexp>`可以包含各种元字符和量词，如`.`匹配任意单个字符，`\d`匹配数字，`\w`匹配字母数字字符，`*`表示前一个字符重复零次或多次。 8. **原则8**：正则表达式可以使用括号来创建子模式，以便于分组和引用匹配的部分。 9. **原则9**：正则表达式还可以包含条件语句、后向引用等高级特性，使得复杂的文本处理变得可能。表9-1中列出了各种正则表达式运算符，每个都有详细的解释和示例。例如，`s/<regexp>/<substituteText>/g`会全局替换所有匹配`<regexp>`的部分为`<substituteText>`。以下是一些使用正则表达式的实例： - `$scalar =~ s/a/b/;` - 将$scalar中的所有'a'替换为'b'，并返回替换是否发生。 - `Name =~ s/a/b/;` - 类似于上面，但作用于名为`Name`的变量。 - `Name =~ s/a/b/g;` - 这个会在`Name`中全局替换所有'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页未读，继续阅读

scpman

粉丝: 1
资源: 8

Perl正则表达式详解：匹配、替换与转换

Perl正则表达式讲解

Perl正则表达式讲解.chm

perl正则表达式讲解

学习资料2 Perl_正则表达式最详细讲解

程序员必读：100+正则表达式实例与跨语言解决方案

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

正则表达式讲解

perl 正则表达式

perl正则表达式手册

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

最新资源