正則表示式/Perl 相容正則表示式
< 正則表示式
Perl 比甚至 POSIX 擴充套件正則表示式 語法擁有更豐富且更可預測的語法。其可預測性體現在 \ 始終用於轉義非字母數字字元。Perl 可以指定但 POSIX 不能指定的一個示例是匹配的一部分是否貪婪。例如，在模式 /a.*b/ 中，.* 將匹配儘可能多的字元，而在模式 /a.*?b/ 中，.*? 將匹配儘可能少的字元。因此，對於字串 "a bad dab"，第一個模式將匹配整個字串，而第二個模式只匹配 "a b"。
由於這些原因，許多其他實用程式和應用程式都採用了與 Perl 非常類似的語法。例如，Java、Ruby、Python、PHP、exim、BBEdit，甚至微軟的 .NET Framework 都使用與 perl 中類似的正則表示式語法。並非所有“Perl 相容”的正則表示式實現都相同，並且許多實現只包含 Perl 特性的子集。
約定 在示例中使用：字元 'm' 並不總是需要指定 perl 匹配操作。例如，m/[^abc]/ 也可以表示為 /[^abc]/。只有當用戶希望在不使用正斜槓作為正則表示式分隔符的情況下指定匹配操作時，'m' 才必不可少。有時，為了避免“分隔符衝突”，指定替代的正則表示式分隔符很有用。有關更多詳細資訊，請參閱 'perldoc perlre'。
metacharacter(s) ;; the metacharacters column specifies the regex syntax being demonstrated =~ m// ;; indicates a regex match operation in perl =~ s/// ;; indicates a regex substitution operation in perl
在下表標題中，“M-c” 代表“元字元”。
| M-c | 描述 | 例子 所有 if 語句都返回 TRUE 值。 |
|---|---|---|
| . | 通常匹配除換行符之外的任何字元。在方括號內，點是字面字元。 |
if ("Hello World\n" =~ m/...../) {
print "Yep"; # Has length >= 5\n";
}
|
| ( ) | 將一系列模式元素分組為一個元素。當您匹配括號內的模式時，您可以使用 $1、$2 等在稍後引用之前匹配的模式。 |
if ("Hello World\n" =~ m/(H..).(o..)/) {
print "We matched '$1' and '$2'\n";
}
輸出
|
| + | 匹配前面的模式元素一次或多次。 |
if ("Hello World\n" =~ m/l+/) {
print "One or more \"l\"'s in the string\n";
}
|
| ? | 匹配前面的模式元素零次或一次。 |
if ("Hello World\n" =~ m/H.?e/) {
print "There is an 'H' and a 'e' separated by ";
print "0-1 characters (Ex: He Hoe)\n";
}
|
| ? | 修改前面的 *、+ 或 {M,N} 的正則表示式，使其匹配儘可能少的次數。 |
if ("Hello World\n" =~ m/(l.+?o)/) {
print "Yep"; # The non-greedy match with 'l' followed
# by one or more characters is 'llo' rather than 'llo wo'.
}
|
| * | 匹配前面的模式元素零次或多次。 |
if ("Hello World\n" =~ m/el*o/) {
print "There is an 'e' followed by zero to many ";
print "'l' followed by 'o' (eo, elo, ello, elllo)\n";
}
|
| {M,N} | 表示最小匹配次數 M 和最大匹配次數 N。 |
if ("Hello World\n" =~ m/l{1,2}/) {
print "There is a substring with at least 1 ";
print "and at most 2 l's in the string\n";
}
|
| [...] | 表示一組可能的字元匹配。 |
if ("Hello World\n" =~ m/[aeiou]+/) {
print "Yep"; # Contains one or more vowels
}
|
| | | 分隔備選匹配項。 |
if ("Hello World\n" =~ m/(Hello|Hi|Pogo)/) {
print "At least one of Hello, Hi, or Pogo is ";
print "contained in the string.\n";
}
|
| \b | 匹配單詞邊界。 |
if ("Hello World\n" =~ m/llo\b/) {
print "There is a word that ends with 'llo'\n";
}
|
| \w | 匹配字母數字字元，包括“_”。 |
if ("Hello World\n" =~ m/\w/) {
print "There is at least one alphanumeric ";
print "character in the string (A-Z, a-z, 0-9, _)\n";
}
|
| \W | 匹配非字母數字字元，不包括“_”。 |
if ("Hello World\n" =~ m/\W/) {
print "The space between Hello and ";
print "World is not alphanumeric\n";
}
|
| \s | 匹配空白字元（空格、製表符、換行符、換頁符） |
if ("Hello World\n" =~ m/\s.*\s/) {
print "There are TWO whitespace characters, which may";
print " be separated by other characters, in the string.";
}
|
| \S | 匹配除空白字元之外的任何字元。 |
if ("Hello World\n" =~ m/\S.*\S/) {
print "Contains two non-whitespace characters " .
"separated by zero or more characters.";
}
|
| \d | 匹配數字，與 [0-9] 相同。 |
if ("99 bottles of beer on the wall." =~ m/(\d+)/) {
print "$1 is the first number in the string'\n";
}
|
| \D | 匹配非數字。 |
if ("Hello World\n" =~ m/\D/) {
print "There is at least one character in the string";
print " that is not a digit.\n";
}
|
| ^ | 匹配行或字串的開頭。 |
if ("Hello World\n" =~ m/^He/) {
print "Starts with the characters 'He'\n";
}
|
| $ | 匹配行或字串的結尾。 |
if ("Hello World\n" =~ m/rld$/) {
print "Is a line or string ";
print "that ends with 'rld'\n";
}
|
| \A | 匹配字串的開頭（但不是內部行）。 |
if ("Hello\nWorld\n" =~ m/\AH/) {
print "Yep"; # The string starts with 'H'.
}
|
| \Z | 匹配字串的結尾（但不是內部行）。 |
if ("Hello\nWorld\n"; =~ m/d\n\Z/) {
print "Yep"; # Ends with 'd\\n'\n";
}
|
| [^...] | 匹配除方括號內字元之外的每個字元。 |
if ("Hello World\n" =~ m/[^abc]/) {
print "Yep"; # Contains a character other than a, b, and c.
}
|
使用 Perl 正則表示式語法的工具和語言包括
- Perl 正則表示式 在 perl.org
- Perl 相容正則表示式庫 在 pcre.org
- Perl 正則表示式語法 在 boost.org
- W:正則表示式#Perl