2、Perl 正则表达式高级用法全解析

Perl 正则表达式高级用法全解析

1. 正则表达式概述

正则表达式是 Perl 文本处理的核心，也是 Perl 广受欢迎的特性之一。许多 Perl 程序员都经历过尝试用正则表达式编写所有程序的阶段，甚至会挑战用单个正则表达式解决问题。下面将介绍一些实用的高级正则表达式特性。

2. 易读的正则表达式

正则表达式以难读著称，它使用简洁的语言，用尽可能少的字符表示几乎无限的可能性。不过，Perl 提供了让正则表达式更易读的方法。
- /x 标志 ：当在匹配或替换操作符中添加 /x 标志时，Perl 会忽略模式中的字面空白。这样可以将模式的各个部分展开，使其更易于辨认。例如，Gisle Aas 的 HTTP::Date 模块解析日期时使用的正则表达式：

# 未使用 /x 标志
/^(\d\d?)(?:\s+|[-\/])(\w+)(?:\s+|[-\/])(\d+)(?:(?:\s+|:)(\d\d?):(\d\d)(?::(\d\d))?)?\s*([-+]?\d{2,4}|(?![APap][Mm]\b)[A-Za-z]+)?\s*(?:\(\w+\))?\s*$/

# 使用 /x 标志
/^
         (\d\d?)               # day
(?:\s+|[-\/])
         (\w+)                 # month
(?:\s+|[-\/])
         (\d+)                 # year
         (?:
   (?:\s+|:)       # separa