diff options
Diffstat (limited to 'pod/pod2man.PL')
| -rw-r--r-- | pod/pod2man.PL | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/pod2man.PL b/pod/pod2man.PL index 61b6129ed9..7494c26595 100644 --- a/pod/pod2man.PL +++ b/pod/pod2man.PL @@ -679,7 +679,7 @@ $indent = 0; $begun = ""; # Unrolling [^-=A-Z>]|[A-Z](?!<)|[-=](?![A-Z]<)[\x00-\xFF] gives: // MRE pp 165. -my $nonest = '(?x) # Turn on /x mode. +my $nonest = q{(?x) # Turn on /x mode. (?: # Group [^-=A-Z>]* # Anything that isn't a dash, equal sign or # closing hook isn't special. Eat as much as @@ -695,7 +695,7 @@ my $nonest = '(?x) # Turn on /x mode. ) # End of special sequences. [^-=A-Z>]* # Followed by zero or more non-special chars. )* # And we can repeat this as often as we can. - )'; # That's all folks. + )}; # That's all folks. while (<>) { if ($cutting) { |