use Test::More tests => 2; BEGIN { use_ok("Test::Exception"); } sub slayme { die "Error message"; } throws_ok { slayme() } qr/Error message/,"Dies correctly"; __OUTPUT__ 1..2 ok 1 - use Test::Exception; ok 2 - Dies correctly