Exception-caught is a project mainly written in Perl, it's free.

Sugar for class-based exception handlers