diff options
Diffstat (limited to 't/run/switchM.t')
| -rw-r--r-- | t/run/switchM.t | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/t/run/switchM.t b/t/run/switchM.t index d2b5994a71..603d5c5fa0 100644 --- a/t/run/switchM.t +++ b/t/run/switchM.t @@ -14,11 +14,13 @@ require './test.pl'; plan(4); like(runperl(switches => ['-Irun/flib', '-Mbroken'], stderr => 1), - qr/^Global symbol "\$x" requires explicit package name at run\/flib\/broken.pm line 6\./, + qr/^Global symbol "\$x" requires explicit package name \(did you (?x: + )forget to declare "my \$x"\?\) at run\/flib\/broken.pm line 6\./, "Ensure -Irun/flib produces correct filename in warnings"); like(runperl(switches => ['-Irun/flib/', '-Mbroken'], stderr => 1), - qr/^Global symbol "\$x" requires explicit package name at run\/flib\/broken.pm line 6\./, + qr/^Global symbol "\$x" requires explicit package name \(did you (?x: + )forget to declare "my \$x"\?\) at run\/flib\/broken.pm line 6\./, "Ensure -Irun/flib/ produces correct filename in warnings"); SKIP: { |