summaryrefslogtreecommitdiff
path: root/scripts/perl.req
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/perl.req')
-rwxr-xr-xscripts/perl.req4
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/perl.req b/scripts/perl.req
index ab21b08ea..1b7286a6a 100755
--- a/scripts/perl.req
+++ b/scripts/perl.req
@@ -104,8 +104,8 @@ sub process_file {
# skip the "= <<" block
- if (m/^\s*\$(?:.*)\s*=\s*<<\s*(["'`])(.*)\1/ ||
- m/^\s*\$(.*)\s*=\s*<<(\w*)\s*;/) {
+ if (m/^\s*\$(?:.*)\s*=\s*<<\s*(["'`])(.+?)\1/ ||
+ m/^\s*\$(.*)\s*=\s*<<(\w+)\s*;/) {
$tag = $2;
while (<FILE>) {
chomp;