| Subject: | [PATCH] Fix for 5.21.4 |
The ‘Global symbol’ message has become longer:
$ perl5.21.4 -Mstrict -e\$foo
Global symbol "$foo" requires explicit package name (did you forget to declare "my $foo"?) at -e line 1.
Execution of -e aborted due to compilation errors.
| Subject: | open_VHv7WQyf.txt |
diff -rup lib-with-preamble-0.001000-xUva6t-orig/t/strict.t lib-with-preamble-0.001000-xUva6t/t/strict.t
--- lib-with-preamble-0.001000-xUva6t-orig/t/strict.t 2014-09-28 12:04:51.000000000 -0700
+++ lib-with-preamble-0.001000-xUva6t/t/strict.t 2014-09-28 12:05:11.000000000 -0700
@@ -7,4 +7,4 @@ ok(
'strict example dies'
);
-like($@, qr{Global symbol "\$orz" requires explicit package name at \S+lib/with/preamble/example/strict.pm line 3}, 'Error has right name and line');
+like($@, qr{Global symbol "\$orz" requires explicit package name(?: \([^)]+\))? at \S+lib/with/preamble/example/strict.pm line 3}, 'Error has right name and line');