diff options
| -rw-r--r-- | t/compile-error.t | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/t/compile-error.t b/t/compile-error.t index db4e980..0bf092f 100644 --- a/t/compile-error.t +++ b/t/compile-error.t @@ -34,7 +34,13 @@ like( like( exception { $foo->meth }, - qr/^Can't locate object method "meth" via package "Foo"/, + qr{^ + # 5.18+ + (?:Can't\ locate\ object\ method\ "meth"\ via\ package\ "Foo") + | + # 5.16 and earlier + (?:Undefined\ subroutine\ &Foo::meth\ called) + }x, "\$foo->meth doesn't work now" ); |