http://qs321.pair.com?node_id=674344


in reply to Testing my carping

There is Test::Exception. It might be what you are looking for

Update: also found Test::Trap and Test::Warn.

In Section Seekers of Perl Wisdom