From: Karl Williamson Date: Wed, 5 May 2010 18:09:47 +0000 (-0600) Subject: perlrebackslash: fix for 80 col display X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f822d0dde66fdda982c2d08cb08ce96a22c7dea0;p=p5sagit%2Fp5-mst-13.2.git perlrebackslash: fix for 80 col display --- diff --git a/pod/perlrebackslash.pod b/pod/perlrebackslash.pod index 461ebd9..6587ea9 100644 --- a/pod/perlrebackslash.pod +++ b/pod/perlrebackslash.pod @@ -75,7 +75,7 @@ as C \e Escape character. \E Turn off \Q, \L and \U processing. Not in []. \f Form feed. - \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. @@ -222,7 +222,7 @@ as a character without special meaning by the regex engine, and will match $str = "Perl"; $str =~ /\120/; # Match, "\120" is "P". - $str =~ /\120+/; # Match, "\120" is "P", it is repeated at least once. + $str =~ /\120+/; # Match, "\120" is "P", it is repeated at least once $str =~ /P\053/; # No match, "\053" is "+" and taken literally. =head4 Caveat @@ -276,7 +276,7 @@ Mnemonic: heIadecimal. $str = "Perl"; $str =~ /\x50/; # Match, "\x50" is "P". - $str =~ /\x50+/; # Match, "\x50" is "P", it is repeated at least once. + $str =~ /\x50+/; # Match, "\x50" is "P", it is repeated at least once $str =~ /P\x2B/; # No match, "\x2B" is "+" and taken literally. /\x{2603}\x{2602}/ # Snowman with an umbrella. @@ -571,7 +571,7 @@ Mnemonic: eItended Unicode character. "\x{256}" =~ /^\C\C$/; # Match as chr (256) takes 2 octets in UTF-8. - $str =~ s/foo\Kbar/baz/g; # Change any 'bar' following a 'foo' to 'baz'. + $str =~ s/foo\Kbar/baz/g; # Change any 'bar' following a 'foo' to 'baz' $str =~ s/(.)\K\1//g; # Delete duplicated characters. "\n" =~ /^\R$/; # Match, \n is a generic newline.