diff options
author | SHIRAKATA Kentaro <argrath@ub32.org> | 2013-04-23 17:34:07 +0900 |
---|---|---|
committer | James E Keenan <jkeenan@cpan.org> | 2013-04-23 20:00:51 -0400 |
commit | f321be7e68d63f48424096568e313ccad2b06211 (patch) | |
tree | a7cace2a8666ca0f04566808fdd931f4c0893cd7 /pod/perlrebackslash.pod | |
parent | 617b0ec97dba4848d15439fac520f7269975cf65 (diff) | |
download | perl-f321be7e68d63f48424096568e313ccad2b06211.tar.gz |
POD nitpicks.
Also, rebreak some verbatim lines to avoid porting error.
Update known_pod_issues.dat.
Diffstat (limited to 'pod/perlrebackslash.pod')
-rw-r--r-- | pod/perlrebackslash.pod | 19 |
1 files changed, 11 insertions, 8 deletions
diff --git a/pod/perlrebackslash.pod b/pod/perlrebackslash.pod index b34ce0c07d..44b0e7db06 100644 --- a/pod/perlrebackslash.pod +++ b/pod/perlrebackslash.pod @@ -68,7 +68,7 @@ as C<Not in [].> \A Beginning of string. Not in []. \b Word/non-word boundary. (Backspace in []). \B Not a word/non-word boundary. Not in []. - \cX Control-X + \cX Control-X. \C Single octet, even under UTF-8. Not in []. \d Character class for digits. \D Character class for non-digits. @@ -76,7 +76,8 @@ as C<Not in [].> \E Turn off \Q, \L and \U processing. Not in []. \f Form feed. \F Foldcase till \E. Not in []. - \g{}, \g1 Named, absolute or relative backreference. Not in [] + \g{}, \g1 Named, absolute or relative backreference. + Not in []. \G Pos assertion. Not in []. \h Character class for horizontal whitespace. \H Character class for non horizontal whitespace. @@ -246,16 +247,17 @@ Mnemonic: I<0>ctal or I<o>ctal. $str = "Perl"; $str =~ /\o{120}/; # Match, "\120" is "P". $str =~ /\120/; # Same. - $str =~ /\o{120}+/; # Match, "\120" is "P", it's repeated at least once + $str =~ /\o{120}+/; # Match, "\120" is "P", + # it's repeated at least once. $str =~ /\120+/; # Same. $str =~ /P\053/; # No match, "\053" is "+" and taken literally. /\o{23073}/ # Black foreground, white background smiling face. - /\o{4801234567}/ # Raises a warning, and yields chr(4) + /\o{4801234567}/ # Raises a warning, and yields chr(4). =head4 Disambiguation rules between old-style octal escapes and backreferences Octal escapes of the C<\000> form outside of bracketed character classes -potentially clash with old-style backreferences. (see L</Absolute referencing> +potentially clash with old-style backreferences (see L</Absolute referencing> below). They both consist of a backslash followed by numbers. So Perl has to use heuristics to determine whether it is a backreference or an octal escape. Perl uses the following rules to disambiguate: @@ -282,7 +284,7 @@ takes only the first three for the octal escape; the rest are matched as is. $pat .= ")" x 999; /^($pat)\1000$/; # Matches 'aa'; there are 1000 capture groups. /^$pat\1000$/; # Matches 'a@0'; there are 999 capture groups - # and \1000 is seen as \100 (a '@') and a '0' + # and \1000 is seen as \100 (a '@') and a '0'. =back @@ -430,7 +432,7 @@ Mnemonic: I<g>roup. =head4 Examples /(\w+) \g1/; # Finds a duplicated word, (e.g. "cat cat"). - /(\w+) \1/; # Same thing; written old-style + /(\w+) \1/; # Same thing; written old-style. /(.)(.)\g2\g1/; # Match a four letter palindrome (e.g. "ABBA"). @@ -647,7 +649,8 @@ Mnemonic: eI<X>tended Unicode character. =head4 Examples - "\x{256}" =~ /^\C\C$/; # Match as chr (0x256) takes 2 octets in UTF-8. + "\x{256}" =~ /^\C\C$/; # Match as chr (0x256) takes + # 2 octets in UTF-8. $str =~ s/foo\Kbar/baz/g; # Change any 'bar' following a 'foo' to 'baz' $str =~ s/(.)\K\g1//g; # Delete duplicated characters. |