可爱的骆驼文(perl)
文章平均质量分 53
lbl20020123
这个作者很懒,什么都没留下…
展开
-
perl子例程参数传递方式初探
perl里,子例程采用可变长参数列表,因此参数的个数不再限制,体现出动态语言的优点。由于传递的是引用,所以可以在sub里改变它的值。 samle01.pl #!/usr/bin/perl sub sub_routine{ $_[0] = "hello"; $_[1] = 999; print "sub_par1:$_[0]/n"; print "sub_par2:$_[1]原创 2004-11-11 13:40:00 · 1693 阅读 · 0 评论 -
perl子例程参数传递方式之二:数组作参数
我们已经知道, perl子例程参数传递方式类似于引用(或者地址)传递,如果在sub里改变形参的值,实参的值亦随之改变。注意:只有实参为一个变量的时候,形参的值才可以改变。类似 &test(1, "abc"); sub test { $_[0]++; .... } 的代码将会报错: Modification of a read-only value attempted at D:/PerlE原创 2004-11-11 16:11:00 · 1676 阅读 · 0 评论 -
比较两个目录文件是否相同
有时候我们需要比较vss里两个目录下的source是否一致,而但从日期根本看不出什么来,所以需要逐一的比较,项目很大时,这项工作比较恼人。所以我做了一个工具,它能调查出来哪些文件内容相同,哪些不同,哪些仅在一个目录存在。 compDir.pl #!/usr/bin/perldie "parameter is not enough./n" if @ARGV $now = localtime原创 2004-11-11 17:24:00 · 1478 阅读 · 0 评论 -
perl里字符串长度的取法
perl好像没有提供strlen函数,用rindex函数可以同样得到字符串的长度。 $str = "abcd 1234"; $len = rindex $str."/$", "/$"; print "$len/n"; 执行结果: lenght of abcd 1234 is: 9原创 2004-11-11 11:22:00 · 1632 阅读 · 0 评论 -
从CPAN上下载module详解
1.下载module并解压。2.阅读readme文件,照做既可,一般会有以下一个步骤:(1) perl Makefile.PL(2)nmake(3)nmake test(4)nmake install原创 2004-11-15 17:29:00 · 1394 阅读 · 0 评论