diff options
Diffstat (limited to 'pod/perlre.pod')
| -rw-r--r-- | pod/perlre.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlre.pod b/pod/perlre.pod index 625988ffef..f0d7645353 100644 --- a/pod/perlre.pod +++ b/pod/perlre.pod @@ -1282,7 +1282,7 @@ this: sub invalid { die "/$_[0]/: invalid escape '\\$_[1]'"} - my %rules = ( '\\' => '\\', + my %rules = ( '\\' => '\\\\', 'Y|' => qr/(?=\S)(?<!\S)|(?!\S)(?<=\S)/ ); sub convert { my $re = shift; |