How to debug in Perl ?, Debugperl

How to debug in Perl ?, Debugperl

If it is a small program, you can use this way:

 

C: \ Rebecca \ script \ perl>Perl-d calculate. pl

 

Loading DB routines from perl5db. pl version 1.39 _ 10

Editor support available.

 

Enter h or 'H H' for help, or 'perldoc perldebug' for morehelp.

 

Main: :( calculate. pl: 3): my $ number1 = 10;

DB <1> $ number1 = 3# You can change the number here

 

DB <2> n# Press n to execute next command

Main: :( calculate. pl: 4): my $ number2 = 6;

DB <2> print $ number1# But you can see it didn 'twork

10

DB <3> $ number1 = 3# Change it again here, it willwork !!

 

DB <4> print $ number1# See, it worked.

3

DB <5> n

Main: :( calculate. pl: 5): my $ sum = $ number1 + $ number2;

DB <5> print $ number2

6

DB <6> $ number =-1# I wanted to change number2 aswell, but I just type number by mistake ....

 

DB <7> n

Main: :( calculate. pl: 7): print $ sum, "\ n ";

DB <7> print $ sum

9

DB <8> q# Quit the debug now