Remove the greedy quantifier from inside the grouping (?:) so that it

and the greedy quantifier on the (?:) don't fight each other until the
C stack is exhausted.

p4raw-id: //depot/perl@26702

diff --git a/lib/Pod/Simple/BlackBox.pm b/lib/Pod/Simple/BlackBox.pm
index 12eba58..90f5d6c 100644 (file)
--- a/lib/Pod/Simple/BlackBox.pm
+++ b/lib/Pod/Simple/BlackBox.pm
@@ -1675,7 +1675,7 @@ sub _treelet_from_formatting_codes {
         |
         (               # $6: stuff containing no start-codes or end-codes
           (?:
-            [^A-Z\s>]+
+            [^A-Z\s>]
             |
             (?:
               [A-Z](?!<)