Printing out the code of an anonymous subroutine

Question

I\'m currently working in a very complex Perl architecture, and I want to create some debugging tools. Since a lot of the behavior involves anonymous subroutines, I\'d like to a

Answer 1

Also, Devel::Dwarn sets Data::Dumper so it deparses by default. It quickly made it my favourite dumper:

perl -MDevel::Dwarn -e "Dwarn { callback => sub { 1+1 } }"

gives

{
  callback => sub {
      2;
  }
}