use feature 'try';
try {
   do_a_thing();
}
catch ( $e ) {
   warn "It failed - $e";
}

##</code><code>##

use feature 'try';
try {
   do_a_thing();
}
catch( $e ) { ... }
finally {
   cleanup();
}