新手求助perl智能匹配

my@nums=qw(2  3  4227);my$result=max(@nums);submax{  my($max_so_far)=shift@_;  foreach(@_){  if($_>$max_so_far){ 

作者: stesting 发布时间: 07-13

字符串反转问题,新手求助

写一个程序,将一些字符串(不同的行)读入一个列表中,逆向输出它。如果是从键盘输入的,那在Unix系统中应当使用CTRL+D表明end-of-file,在Windows系统中使用CTRL+Z.@line=<STDIO>;@line=reverse@line;print@line;我这样写的,为啥输出的时候不反转的呢?我应该怎么改啊,不是很懂。谢谢啦~

作者: 瑞梦生 发布时间: 07-13

难道是随机的吗?

my@key=qw/onetwothree/;my@val=(1..3);@key_val{@key}=@val;printjoin$",values%key_val;运行结果:312我以为是:123可能对Perl的基础部分没有了解透切,求指点。

作者: mysqllog 发布时间: 07-12

PERL里的单冒号是什么意思?

看着跟C里的继承类似的。但是找了找书和网上好像没有说单冒号的用法啊。usethreads::shared;my$a:shared=0;

作者: bjzjyang 发布时间: 07-12

Perl Parser 的解析过程

之前看文档了解到Perl解析的过程比较复杂,手写的tokenizer而且还要和yacc交互,再就是parsePerl属于停机问题但没有真正理解。不过今天看过这个示例之后明白了whatever/25;#/;die"thisdies!";复制代码解析这条语句的时候tokenizer必须知道what

作者: zhlong8 发布时间: 07-12

(转)PHP Pear & Pecl & Perl CPAN

原文链接:http://c9s.blogspot.com/2011/07/php-pear-pecl-perl-cpan.html雖然說PHP有類似Perl的CPAN的Pear以及Pecl套件庫可用。但不管是Pear或是Pecl套件數目都不多,有許多套件都是Alpha或是Beta的狀態,許多套件也未含詳細文件。Pecl的套件數:265Pear的

作者: iakuf 发布时间: 07-12

Sequence (?'-...) not recognized in regex; marked by

本帖最后由yakczh于2011-07-1209:03编辑http://kb.cnblogs.com/page/79197/从上面这个地址的例子说可以匹配嵌套的html但是运行代码$test=<<HTML<div>

作者: yakczh 发布时间: 07-12

SOAP::Lite 作为客户端报302 moved temporarily

入题,调用输入WSDL然后访问服务端方法就302movedtemporarily为啥Lite不能自动重定向?我该咋办?谢谢了

作者: ppm10103 发布时间: 07-11

Perl有没有简历自动识别程序例子

本帖最后由newstudent2011于2011-07-1123:10编辑我用过名片扫描仪,识别正确率能达到95%以上忽然想到公司存有大量员工的word,excel版本简历需要录入处理,规格格式不一,能不能利用Perl的强大的文本处理能力,来写写个简历智能识别系统有没有这方面的例子,姓名,邮箱,性别,学历,比较容易匹配,工作经历和自我介绍等就难说了,做到95%的智能化,会

作者: newstudent2011 发布时间: 07-11

【求助】为什么eval 正则会溢出?

新手问题while(<IN>){            chomp;      &

作者: windrlee 发布时间: 07-11