'Native' try {} catch {} semantics for perl using Devel::Declare