由于公司需要,本人最近在学习Perl这种脚本语言,本文是我在学习Perl的过程中总结出来的一些心得和笔记,希望能够帮助也在学习Perl的各位同僚。废话不多说直接上干货!!!
———————————————————————————干货分割线 —————————————————————————
1.什么是调试程序
P e r l调试程序是个P e r l解释程序的内置特性。它使你能够取出任何一个P e r l程序,然后逐个语句运行该程序。在运行过程中,你可以查看各个变量,修改这些变量,让程序运行较长
的时间,中断程序的运行,或者从头开始运行该程序。
2.启动调试程序
若要启动P e r l调试程序,必须打开操作系统的命令提示符。若你是D O S和Wi n d o w s用户,那么要打开M S - D O S的标准提示符C : \。如果是U N I X用户,这个提示符应该是你登录时显示的提示符(通常是%或$)。PS:本例中使用D O S提示符,以perl9中的程序为例(可查看博客perl9的内容)
启动调试程序:
perl -d Employee.pl
输出该命令后,会显示版本信息:
该调试程序首先显示版本号和help 提示。接着显示该程序的第一行可执行代码。由于第一个语句实际上包含7行,从“my @employees=(”开始,以“);”为结尾,因此所有7行语句均显示一个描述,以说明它们来自什么文件,以及它们是在文件的哪一行或哪几行上找到的(第5至第11行)。
最后,你看到调试文件的提示符D B < 1 >。1表示调试文件正在等待它的第一个命令。调试程序提示符后面的光标正等待你输入命令。这时,你的P e r l程序实际上暂停在第一个指令-my @employees=(的前面。每当调试程序向你显示程序中的一个语句时,它就是准备要执行的语句,而不是上一个运行的语句。现在调试程序已经作好准备,等待你输入命令。
3.调试程序的基本命令
1>.h:帮助命令,所有可用命令均被输出.
2>.h h:帮助命令的变形版本,可以输出命令和语句的汇总.
3>.h cmd:输出某个命令的帮助信息.
4>.|:每次显示一屏幕命令.如:查看一屏幕帮助可用:|h.
5>.n:运行perl程序的下一个语句
当你键入命令n后,perll就执行Employee程序的第5至11行语句。然后调试程序输出要执行的下一个语句(但尚未运行) m y ( $ L 1,$ F 1 ) = s p l i t(’,’,$ a);并显示另一个提示符。
当程序运行到这个时候, @ e m p l o y e e s被初始化为5个名字和工资等。若要查看这些信息,可以将它们输出:
print @employees [原始版]
显示:
也可以更清楚的显示输出信息,键入:
Print join(“\n”,@employees) [升级版]
显示:
4.断点
如果不是每次执行一个指令,你可以让调试程序连续运行你的P e r l程序,直到到达某个语句,然后停止运行。这些停止运行的位置称为断点。
若要设置断点,请使用b breakpoint命令,其中breakpoint可以是行号或子例程名。若要在第3 3行上设置断点,可以输入下面这个命令:
b 33
你可以使用l命令来浏览程序行,看看哪行适合添加断点(断点不能设置在花括号、标点符号、空行或只包含注释的代码行上)。命令l用于列出程序的下面1 0行。再次键l,可以列出下面的1 0行,如此类推。若要列出从某一行开始的程序,请键入l lineno,其中lineno是程序的行号。也可以设定要列出的行的范围,方法是键入命令l start-end。
键入:l
显示:
PS:,标号= = = >用于指明调试程序准备执行的当前行.
命令c:。命令c向调试程序发出指令,使P e r l程序运行到下一个断点或程序的结尾:
显示:
命令d:若要撤消程序中的断点,可以采用命令d,比如d line 或d submane.
命令R:重新启动你的程序,该命令使perl程序回到它的开始处.
命令s:单步进入设置断点的程序行中.s命令的作用是执行函数,然后在函数中的第1个指令处停止运行.
还可以在P e r l程序运行时修改程序里的变量。例如,若要给员工每小时临时增加2 . 5 0美元
的工资,可以输入下面的代码:
print $hourly
$hourly = $hourly + 2.50,如下:
命令q:退出调试程序
5.单命令行程序
这种程序的关键是在命令行上赋予P e r l的- e开关。- e的后面可以是任何P e r l语句,如:
Perl -e “print ‘hello,world’;”
显示:
插入多个语句:
perl -e "print 'hello,world';" -e "print'howzit goin?'"
显示:
-c:P e r l解释程序中的- c开关可供P e r l用来查看你的代码,以便找出语句上的问题,但是它实
际上并不运行程序,当程序正确时,显示:
当程序错误时,报错,显示:
6.<>与更多单命令行程序
迄今为止介绍的尖括号运算符( < >)具有两个功能:
1) 如果尖括号中间是文件句柄,尖括号运算符允许你读取文件句柄,比如< S T D I N >。
2) 如果尖括号中间是搜索模式,尖括号运算符能返回与该模式匹配的文件列表,这称为一个glob,比如< * . b a t >。
尖括号运算符还有另一个功能。一组尖括号运算符如果中间没有任何东西,那么它可以读取命令行上所有文件的内容;如果没有给出文件名,则可以读取标准输出。
Exp:
#!/usr/bin/perl -w
use strict;
use warnings;
while(<>){
print $_;
}
如果将上面的程序保存为E x a m p l e . p l,那么用下面这个命令行运行该程序:
perl -w Example.pl file1 file2 file3
就可使运算符< >读取f i l e 1的内容,每次读1行,然后读取f i l e 2,接着读取f i l e 3。
Perl程序的- n开关可用于将任何- e语句封装在该小程序中:
LINE:
While(<>){
... #Your -e statements here.
}
因此,若要创建一个简短的单命令行程序,从输入数据中删除前导空格,你可以编写下面的命令:
Perl -n -e ‘s/^\s+//g;print $_;’ file1
上面这个命令实际上运行类似下面这个P e r l程序:
LINE:
While(<>){
s/^\s+//g;
print $_;
}
在上面这个代码段中,名字为f i l e 1的文件被打开,并被赋予w h i l e循环中的$_,每次1行。该行用S / ^ \ S + / / g进行编辑,然后进行输出。- p与- n开关的作用相同,差别在于语句执行后各个文件行便自动输出。因此,重新编写上面这个命令行便产生下面这个命令行:
perl -p -e ’s/^\s+//g’ file1
当你用P e r l的单命令行程序来编辑一个文件时,必须注意不要在打开文件进行读取操作的同时,又试图对它进行写入操作,像下面这个例子那样:
perl -p -e ‘s/\r//g’ dosfile > dosfile
上面这个代码段试图从称为dosfile的文件中删除回车符。问题是在P e r l命令被处理之前,dosfile文件已经被>dosfile改写。编辑文件的正确方法应该是将输入重定向到另一个文件中,并将文件改为它的原始名字,如下所示:
perl -p -e ‘s/\r//g’dosfile > tempfile
rename tempfile dosfile
7.使用引用调试程序:
若你的程序中有引用,你可以输出该引用,perl能够显示该引用指向什么结构,如:
print $mystery_ref;
显示:ARRAY(0X1231920)
这意味着$mystery_ref;是对一个数组的引用.此外,变量也可以是对标量(SCALAR)、哈希结构(HASH)或子例程(CODE)的引用.若要输出$mystery_ref指向的数组,可以将它作为数组来处理,如下所示:
print join(‘,’,@{$mystery_ref});
当你在程序的调试窗口中输入调试命令:print $ref ,它若显示HASH(0X20222dac),显然,$ref是指一个哈希结构.然后输入命令:x $ref,
会显示:
在这个代码中,该引用包含一个带有两个元素(关键字‘ f r u i t’和‘ v e g e t a b l e’)的哈希
结构。该调试程序甚至能够输出列表的列表之类的复杂数据结构,如下所示:
上面的例子显示了一个引用$ a,它指向一个数组ARRAY(0x20170bd4)。而这个数组又包含3个别的数据引用,即ARRAY(0x20115484)、ARRAY(0x2011fbb4)和ARRAY(0x2011faa0),每个数组包含3个元素。