H:\store\workspace\myTestCodes>perl -d .\test6.pl

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

Enter h or 'h h' for help, or 'perldoc perldebug' for more help.

main::(.\test6.pl:8):   };

  DB<1> c 10
main::(.\test6.pl:10):  testMethod();

  DB<2> b $mysubref

  DB<3> L b
.\test6.pl:
 10:    testMethod();
   break if ($mysubref)

  DB<4> c
in testMethod
This is code Ref 0
This is code Ref 1
This is code Ref 2
end the program
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.

  DB<4>