DEV Community

Will Sheppard
Will Sheppard

Posted on

How to get past Sub::Defer in the Perl debugger

YOU ARE IN A MAZE OF TWISTY LITTLE PASSAGES, ALL ALIKE

perl -d professional_adventure_2024.pl

Sub::Defer::CODE(0x8ab8938)(/epsi/perlbrew/perls/perl-5.16.3/lib/perl5/Sub/Defer.pm:55):
55:         $undeferred ||= undefer_sub($deferred_info->[3]);
auto(-1)  DB<2> v
52:       my $undeferred;
53:       my $deferred_info;
54        my $deferred = sub {
55==>       $undeferred ||= undefer_sub($deferred_info->[3]);
56:         goto &$undeferred;
57:       };
58:       $deferred_info = [ $target, $maker, \$undeferred, $deferred ];
59:       weaken($deferred_info->[3]);
60:       weaken($DEFERRED{$deferred} = $deferred_info);
61:       _install_coderef($target => $deferred) if defined $target;
  DB<2> n
Enter fullscreen mode Exit fullscreen mode

Walkthrough:

  • 7n
  • 3s

Top comments (0)