本帖最后由gaochong于2010-11-1021:08编辑perl学习中。模块：  http://cpansearch.perl.org/src/BLOONIX/Sys-Statistics-Linux-0.59/lib/Sys/Statistics/Linux/DiskUsage.pmnew代码如下：subnew{  

我希望在perl中同时，并行的telnet多个服务器，并送出一条命令，这个命令的执行可能要好几分钟，我希望不是一个一个的去telnet各个服务器，而是同时向多个服务器telnet并送出命令，如何实现比较好？谢谢！

我刚从php转过来，写点perl用了usestrict;满篇的语法错误，真是触目惊心大家平时喜欢用strict模式吗

cattest5useDBI;usestrict;$dbh=DBI->connect("DBI:mysql:database=somedb:host=localhost","user",            "pass",{'

我的字符串如下格式FPxxxxddxxxx为数字，不一定是4位数，位数是不确定的dd为非数字，通常为空格，也可能是别的字符，但不是数字我以前是如下匹配的$feature_name=~/^FP(.+?)/但是是根据空格，目前有可能不是空格，请问应该如何写匹配？谢谢！

本帖最后由xingzhou823于2010-11-1015:33编辑usestrict;usewarnings;openmy$fh,"<","rice_test01.txt"ordie"Error.\n";w

质量很不错的PDF，给大家分享。==============Thinking.in.Perl(Perl编程思想).pdf(1.96MB)下载次数:142010-11-1014:50

当前local是UTF8，perl读取的文件也是utf8。请问有什么方法判断读取的文件内容中文是否乱码？内容大概为格式：不乱码：QUOTE:createtablexxxxxxxxxxxx................createtable中华人民共和国乱码:createtab

Perl语言入门(第四版).pdf(1.19MB)下载次数:112010-11-0816:25

$right=~s/^\s*//;$right=~s/\s*$//;复制代码这两个正则表达式这么理解