tring_pp($ex); # Programmatic API local Exception::Backtrace::decorator = sub { JSON::XS::encode_json(shift) }; my $bt3 = Exception::Backtrace::get_backtrace($@); say $bt3->perl_trac