发布时间：2013-01-06 22:07:40
shell -x 打印shell没步执行的perl执行参数说明：h-显示具体的调试命令帮助信息n-单步调试，跳过sub函数b-设置断点，若要设置断点，请使用b breakpoint命令，其中breakpoint可以是行号或子例程名。c-继续命令，命令c向调试程序发出指令，使Perl程序运行到下一个断点或程序的结尾。l-列出程序代码，。命令l用于列出程序的下面10行。再次键l，可以列出下面的10行，如此类推。若要列出从某一行开始的程序，请键入l lineno，其中lineno是程序的行号。也可以设定要列出的行的范围，方法是键入命令l start-end。L-查看你在程序中已经设置的断点。R-重新......【阅读全文】
发布时间：2013-01-06 17:23:19
yangfeng@sbuild:~/perl$ cat pwd.pl #!/usr/bin/perl$result=`pwd`;@number=split(/\//,$result);print "$result";print "@number\n";my @listpl=<*.pl>;print "@listpl\n";yangfeng@sbuild:~/perl$ ./pwd.pl /home/yangfeng/perl home yangfeng perlargv.pl chdir.pl chomp.pl foreach.pl ge......【阅读全文】
发布时间：2013-01-04 21:33:30
#!/usr/bin/perl$argv1=$0;$argv2=$1;$argv3=@ARGV[0];$argv4=@ARGV[1];print "$argv3\n";print "$argv4\n";print "$argv1\n";print "$argv2\n";yangfeng@yangfeng-desktop:~/msm8x25_1034$ ./test.pl e666-gx ne666-gxn./test.plyangfeng@yangfeng-desktop:~/msm8x25_1034$......【阅读全文】
发布时间：2012-12-27 17:24:43
yangfeng@sbuild:~/perl$ cat re.pl #!/usr/bin/perl@t = qw{ e666[gx].mk, zprojects/e666[gx]/makefile.mk,e666/[op]/makefile.mk,e666[gx]/makefile.mk};foreach $mm ( @t ){ print "$mm\n" if ($mm =~m/.*\/(\w+)(\[\w+.*\])?\/(\w+).mk/);}yangfeng@sbuild:~/perl$ ./re.pl zprojects/e666[gx]......【阅读全文】
发布时间：2012-12-21 21:36:01
yangfeng@sbuild:~/perl$ cat hash.pl #!/usr/bin/perlmy %hash=("a"=>1,"b"=>2,"c"=>3);my @k=keys%hash;my @v=values%hash;print "@k\n";print "@v\n";yangfeng@sbuild:~/perl$ ./hash.pl c a b3 1 2......【阅读全文】
