http://www.perlmonks.org?node_id=324819


in reply to Re: Re: How to lose Carp levels with @CARP_NOT?
in thread How to lose Carp levels with @CARP_NOT?

A quick check shows that longmess protects against newlines in the parameters, so manually filtering should work fairly easily (completely untested):
$longmess =~ s/\n\tLog::Dispatch::(Perl::|::Output::)?[^:]+\(.*//g;