打开调试开关
Perl是解释型语言,运行一个Perl脚本,可以通过在命令行中敲入形如 Perl Test.pl 的命令直接解释执行。如果想调试我们的脚本程序,可以加上-d选项,命令为perl -d Test.pl,回车后程序会停在DB<1>处,如下图所示:
从上图看出程序执行到主(main)程序的第二行(Test.pl 2)
插入/查看/删除断点
插入断点可以使用b命令,命令格式为:b 行号/函数名 条件,在上图中DB<1>处即可设置断点,如下图所示:
在子过程SetInitValue处设置了断点
查看设置的断点使用L命令,注意是大写,小写是显示尚未执行到的代码的部分内容,如下图所示:
断点设置在21行处
删除设置的断点请使用B命令,该命令格式为:B 行号| *,可以指定行号来删除断点或者使用通配符*来删除所有的断点,如下图所示:
删除21行处的断点
增加/查看/删除监视
添加监视对于调试程序非常重要,本示例脚本中定义了一个名叫$val的变量,初始值为1,在SetInitValue函数中修改值为12。通过对其添加监视,来理解Perl中怎么增减删除监视的
添加一个$val==1表达式的监视,命令为w $val==1,如下图所示:
添加对表达式的一个监视
查看当前表达式的值可以使用p命令,格式为p expr,查看$val==1的当前表达式值命令为:p $val==1,如下图所示:
当前表达式值为1,即true
删除监视可使用W(大写字母)命令,格式为:W expr|*,可以删除指定的表达式或者使用通配符*删除所有的监视值,如下图所示:
删除对表达式$val==1的监视
步入执行(Step Into)
步入执行即单步调试中,碰到子过程会进入子过程中执行,命令为s,如下图所示:
步入执行,进入到SetInitValue子过程中
步出执行(Step Out)
步出执行及单步调试中,遇到调用其他子过程的时候,不会进入子过程中,而是直接执行该子过程的其余行,然后将控制权返回给子过程调用者。示例程序在SetInitValue子过程中调用了AddRet子过程,通过下图可以看出其中的区别:
示例程序部分代码
调试程序到SetInitValue子过程调用AddRet子过程处
使用s命令会步入到AddRet子过程中
使用n命令直接执行完AddRet后返回
跳出执行(Return from subroutine)
这个命令其实比较有用,在简单的程序中或许感觉不出来。但是当你调试一个大型的perl程序的时候,你会发现你所调试的程序往往引用了很多的其他自定义的或者第三方模块,并且调试的程序可能会频繁的进入这些模块代码中,为了节省时间与方便,我们更多会选择跳出命令选项直接从这个模块或者当期陷入的子过程中跳出。
其命令为r,我们在上述例子中s命令跳入AddRet子过程的基础上,使用r命令返回,如下图所示:
使用r命令从AddRet子过程直接跳出
退出调试
退出调试使用命令q,如下图所示:
调试命令列表如下:(所有命令都在调试提示符下顶格输入,命令大小写有关)
h:显示调试器的帮助信息。
|h:以分页形式显示调试器的帮助信息。
h h:显示一个压缩的帮助信息。 h 调试命令:显示某个调试命令的帮助。
p 表达式:显示变量或表达式的值,不显示复杂变量嵌入的结构和数据。
x 表达式:显示变量或表达式的值,对较为复杂的变量,以一种可读形式显示嵌入的结构 和数据。
V 包名 变量名列表:显示指定包内的所有(或部分)变量的值。(缺省的包名为 main)
X 变量名列表:显示当前包内所有(或部分)变量的值。
注:V、X命令中的变量名列表以空格分隔且变量名前应去掉$、@或%
T:程序的调用栈回退一级。
s 表达式:单步执行,进入子函数。(step into)如果提供一个表达式并且表达式中包 括函数调用,则单步进入该函数内。
n 表达式:单步执行,越过子函数。(step over)
c 行号/函数名:执行到某一行或某一个函数。
l:显示未执行的一窗(一屏)文件内容。
l min-max:显示第min到第max行的文件内容。
l 行号:显示指定行的内容。
l 函数名:显示指定函数的一窗(一屏)文件内容。
v 行号:显示某行周围一窗(一屏)文件内容。
f 文件名:切换到另一个文件。
/模式:在当前文件中向前(文件尾)查找匹配的字符串。
?模式:在当前文件中向后(文件头)查找匹配的字符串。
L:显示所有断点和附加操作。
S 模式:显示匹配(或不匹配,在模式前加!)的函数名。 t:切换跟踪模式。
t 表达式:跟踪执行表达式过程。
b 行号 条件:在某一行设置一个断点,当程序执行到该行并且条件满足时,产生中断。
b 函数名 条件:在某函数上设置一个断点,当程序执行到该函数并且条件满足时,产生 中断。
B:删除所有断点。
a 行号 命令:给程序的某一行加一个附加操作。在执行该行语句前先执行附加的操作。
A:删除所有已安装的附加操作。
w 表达式:增加一个监视项。
W:删除所有监视项。
O 选项名?:查询调试器可选项的值。 O 选项名=选项值:设置调试器可选项的值。
lt Perl语句:设置一个操作显示调试提示符前执行的操作。
ltlt Perl语句:增加一个显示调试提示符前执行的操作。
gt Perl语句:设置一个离开调试提示符(转入运行态)时执行的操作。
gtgt Perl语句:增加一个离开调试提示符(转入运行态)时执行的操作。
{ 调试命令:设置一个操作显示调试提示符前执行的操作。
{{ 调试命令:设置一个操作显示调试提示符前执行的操作。 注:上述Perl语句和调试命令均可输入多行,行尾以\转义。
!number:重新执行以前第number次执行的调试命令。
!-number:重新执行现在以前number次执行的调试命令。
!模式:重新执行以前执行过的与模式匹配的调试命令。
!!命令:不退出调试器执行一个shell命令。
H-number:显示以前执行的number条调试命令。如果省略number,则显示所有执行过的 调试命令。
R:重新启动正在调试的程序。
.:显示当前调试的行。
q或^D:退出调试器。
|调试命令:将调试命令的输出分页显示。
||调试命令:类似|调试命令,适于有大量输出的调试命令,例如:|V main。
= 别名 值:给某个调试命令一个别名,例如:= quit q。
所有未识别的命令:当作插入的一条Perl语句执行。(使用eval)
补充:Perl对正则表达式调优方法
在脚本中增加 use re "debug";执行脚本将看到正则表达式执行的结果