自己写的package,要加这句吗our @ISA = qw(Exporter);
看到lib下面的package很多都带这一句,自己封装了个package,是不是也应该加上?
作者: yakczh 发布时间: 02-11
为啥提示 Use of uninitialized value in numeric ge (>=) at
if(($fir<=$plus)&&($fir>=$minus))$fir $plus$minus这3个变量都有值
作者: ztj2247 发布时间: 02-11
只显示出现两次的元素的疑问
@crops=qw(wheatcornbarleyricecornsoybeanhay alfalfaricehaybeetscornhay);@duplicates=grep{$count{$_}==2} &nb
作者: baoyu05 发布时间: 02-11
perl中访问散列的键对应的值时候键到底需不需要引号括起来?
[root@node254~]#perl%student=("Math"=>{"joe"=>95,"peter"=>100}, "Science"=>{"joe"=>100,"peter"=>80}
作者: aoma 发布时间: 02-11
一个匹配替换,提示有错误,请指点,谢谢
本帖最后由Ericzhao82于2011-02-1017:54编辑总说我这行语法错误,可是错在哪里了呀?请指点,谢谢syntaxerrorattransconf.plline15,near"s/<VirtualHost(\w+)/server\\{/g$line需求是将<VirtualHost*>替换为server{
作者: Ericzhao82 发布时间: 02-10
map中如何实现正则替换
比如@list=qw(perl5,php5);print"@list";@list=map{s/5/6/}@list;print"@list";复制代码我要把列表中5替换成6 如果写成
作者: yakczh 发布时间: 02-10
寻求帮助呢!根据一个文件每行的部分内容提取另一个文件的序列!!!!
新建文件夹.rar(35.3KB)下载次数:82011-02-1015:33实现功能:file1中fips1PMG_6若和file2中ACS_ake_6中的数字相同,则提取序列并保存。file2中剩下未匹配的序列也保存在另一个文件中。即两个文件_后面的数字若相同,序列保存在一个文件,其余序列保存在另一个文件!谢谢!perl应该可以实现,
作者: Learnperl 发布时间: 02-10