summaryrefslogtreecommitdiffstats
path: root/contrib/perl5/lib/Text/ParseWords.pm
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/perl5/lib/Text/ParseWords.pm')
-rw-r--r--contrib/perl5/lib/Text/ParseWords.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/perl5/lib/Text/ParseWords.pm b/contrib/perl5/lib/Text/ParseWords.pm
index 2414f80..065c2f7 100644
--- a/contrib/perl5/lib/Text/ParseWords.pm
+++ b/contrib/perl5/lib/Text/ParseWords.pm
@@ -63,7 +63,7 @@ sub parse_line {
([\000-\377]*) # and the rest
| # --OR--
^((?:\\.|[^\\"'])*?) # an $unquoted text
- (\Z(?!\n)|$delimiter|(?!^)(?=["']))
+ (\Z(?!\n)|(?-x:$delimiter)|(?!^)(?=["']))
# plus EOL, delimiter, or quote
([\000-\377]*) # the rest
/x; # extended layout
OpenPOWER on IntegriCloud