255[am]king ~/a$ perl -wd a

Loading DB routines from perl5db.pl version 1.27
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(a:1):    print "Hello\n";
  DB<1> b 10
  DB<2> c
Hello
Middle
main::a(a:10):     die # <--- line 10
  DB<2> T
. = main::a(1) called from file `a' line 4
  DB<2> Died at a line 10.
 at a line 10
        main::a(1) called at a line 4
255[am]king ~/a$