ok( ! &working_l::setlist, "calling undefined routine fails" );
---
Undefined subroutine &working_l::setlist called at working.t line 33.
    # Child (calling undefined subs should not work) exited without calling finalize()
not ok 3 - calling undefined subs should not work
#   Failed test 'calling undefined subs should not work'
#   at C:/Dwimperl/perl/lib/Test/Builder.pm line 252.
# Tests were run but no plan was declared and done_testing() was not seen.