The eval block appears to fail even on a system that does have Test::Warn. The content of "$@" is:
Undefined subroutine &Test::Warn::import called at t/01-test_errors.t line 13.
| [reply] [Watch: Dir/Any] |
| [reply] [Watch: Dir/Any] [d/l] [select] |
$ perl t/01-test_errors.t
1..43
$@:
ARRAY(0x6acb08) is not a hash reference.
ok 1 - non-hash reference to cpf2data()
Can't call method "warning_like" without a package or object reference at t/01-test_errors.t line 18.
# Looks like you planned 43 tests but only ran 1.
# Looks like your test died just after 1.
Here, ARRAY... is the warning that I want to trap. | [reply] [Watch: Dir/Any] |