Perl 相关
zgl_dm
这个作者很懒,什么都没留下…
展开
-
A simple perl class
// student.pluse Student;$stuCount=0;while($stuCount3)...{ $stuObj=Student->new();; $stuObj->name("a"); $stuObj->age($stuCount+10); push @AllStu,$stuObj; $stuCount++;}while($stuCo原创 2007-09-05 14:45:00 · 645 阅读 · 0 评论 -
中文字符串匹配问题
首先看如下代码:$s="图盟科技 mapabc";$t="济";if($s=~/$t/)...{ print "good "; }else...{ print "bad ";}程序运行结果:good分析:由于“图”的右半边与“盟”的左半边合成了“济”字,故匹配成功。但在中文处理中这种情况是不合理的。解决方案:引入 Encode 包。use Encode;$原创 2007-09-05 18:09:00 · 1278 阅读 · 0 评论 -
关于perl脚本执行时间的问题
use Time::HiRes qw(gettimeofday);$start_time=gettimeofday;#你的代码$end_time=gettimeofday;print $end_time-$start_time; #程序运行消耗的时间。转载 2007-09-06 14:34:00 · 4050 阅读 · 0 评论 -
关于数组的一些用法
下面的代码演示了关于数组的一些用法: $s="how,are,you";@array=split(/,/,$s);$length=@array;($t)=@array;printf "The first element is %s ",$t;printf "The first element is %s ",@array;printf "The length of array原创 2007-09-06 09:26:00 · 824 阅读 · 0 评论 -
正则表达式的基本语法
首先让我们看两个特殊的符号^和$。他们的作用是分别指出一个字符串的开始和结束。例子如下:"^The":表示所有以"The"开始的字符串("There","The cat"等);"of despair$":表示所以以"of despair"结尾的字符串;"^abc$":表示开始和结尾都是"abc"的字符串——呵呵,只有"abc"自己了;"notice":表示任何包含"noti转载 2007-09-06 10:45:00 · 697 阅读 · 0 评论 -
关于提取文件名和路径
use File::Basename; #引用模块,该模块用于从绝对路径中提取文件名$full_name="E:/lx/perl/t2.pl";$filename=basename($full_name);#从模块中调用basename函数完成提取文件名$filename=~s!s!_!g;#若文件名有空格的处理$dirname=dirname($full_name);print "Th转载 2007-09-06 15:10:00 · 1692 阅读 · 0 评论 -
Perl对中文的处理
Perl从5.6开始已经开始在内部使用utf8编码来表示字符,也就是说对中文以及其他语言字符的处理应该是完全没有问题的。我们只需要利用好Encode这个模块便能充分发挥Perl的utf8字符的优势了。 下面就以中文文本的处理为例进行说明,比如有一个字符串”测试文本”,我们想要把这个中文字符串拆成单个字符,可以这样写: use Encode;$dat=”测试文本”;$str转载 2007-09-07 12:16:00 · 2231 阅读 · 0 评论 -
字符串中的单引号和双引号的差别
给字符串加双引号和单引号的主要差别是: (1) 使用单引号的字符串含义是非常直观的,单引号字符串中的每个字符就是表示它自己的含义。在双引号中的字符串中, Perl 要查看是否存在变量名或转义序列。 转义序列是一些特殊字符串,你可以将难以键入和以后难以识别的字符嵌入字符串。 (2) 如果 Perl 在双引号字符串中找到了一个变量,那么它将被内插替换。这就是说,双引号字符串中的变转载 2007-09-06 16:27:00 · 10259 阅读 · 0 评论 -
HTML::LinkExtor
NAME SYNOPSIS DESCRIPTION EXAMPLE SEE ALSO COPYRIGHT NAMEHTML::LinkExtor - Extract links from an HTML document SYNOPSIS转载 2007-09-07 18:14:00 · 1185 阅读 · 0 评论