请问
first123456789123456789second234567893456789233等等.....我的一个文件格式如上,比方说,我想按照列来操作这个文件,就是每一列都归为一个数组,该怎么操作呢,请高手给个提示,谢谢!
作者: 超级细菌 发布时间: 03-28
递归算法
大家好: 想学习点算法的知识。不过马上被递归的算法搞迷了。不知道函数该如何调用自身。我想做个最简单的阶乘。1*2*3.。。。*10.做和10的阶乘。 程序运行出差。怎么改改?my$n=10;my$result=DiGui($n);print"$result\n";subDiGui{ my
作者: leigh111 发布时间: 03-28
多次调用perl 连接数据库 内存不断累积直至耗尽
#!/usr/bin/perluseDBI;usestrict;usevarsqw($dbh$sth);my$jieguo=0;$dbh=DBI->connect("dbi:Oracle:host=192.168.1.22;sid=wddb","lb_test","lb_test");my$sth=$dbh->prepare("BEGINp
作者: wrsxm 发布时间: 03-28
求助:下面这个\G程序怎么运行不了啊
$a="123456789";while(not$a=~/\G\z/cg){if($a=~/\G12/gc) {print"haha";}elsif($a=~/\G6/gc) {print"\n\nhaha\n\n";}}
作者: 塞图宝 发布时间: 03-27
请教:一个排序的算法问题
类似于一个作业依赖关系:比如,1的前提是2和3;2的前提是4;3的前提是5;4的前提是6.这样,排序应该是654321或者563421等,就是没有依赖关系的次序可以随便。想不好这样的排序用perl怎么实现,有达人能指教下吗?谢谢。
作者: askersky 发布时间: 03-27
perl use module 问题
在main包中usemodule;比如在这个模块里存在subhello那么在main包中可以通过&hello访问如果在main包中也有subhello那么通过&hello访问的是main中的hello而不是module中的为什么会出现这种情况呢??
作者: zzy7186 发布时间: 03-27
open函数能在文件中后退吗?
rtopen(FILE,"<test.txt");while(1){my$line=<FILE>;#下一个循环后如何让$line不变?}
作者: linfengfeiye 发布时间: 03-27
这个正则怎么写?
将[email protected]后面的ip地址去掉,得到[email protected];为什么下面都失败呢?$line=~ s/@\d+\.\d+\.\d+\.\d+//g;$line=~s/\@\d{2}\.0\.0\.1//g;$line=~s/@[0-9]0-9]\.0\.0\.1//g;$line=~s/\@
作者: linfengfeiye 发布时间: 03-27