Select Code to Download

$ cat debugger.pl
use strict;
...
} else {
    say "something else";
}

$ perl -d debugger.pl 4

...
Debugged program terminated.  Use q to quit or R to restart,
  use o inhibit_exit to avoid stopping after program termination,
  h q, h R or h o to get additional info.