#!/usr/bin/perlusestrict;usewarnings;my$s=4;$s||=3;print$s;复制代码print出

写的简单点  我没做过perl  复杂了不好理解谢谢各位

unix环境有个根文件夹/in  下面有若干个子文件夹  每个子文件加下有批量txt文件现对/in文件夹下的所有txt进行处理后  保存到/saved下但现在有个问题，就是/in下面的子目录必须与/saved下的对应比如/in下有两个子文件夹20101010与20101011即/in/20101010&n

大家有没有好的方便的产生uniqueID的办法。不用perl的模板，因为环境上要装新的模块太麻烦。也不依赖于操作系统产生，这样的可迁移性太差了点。谢谢。

我想能不能不使用perl的net：：ftp模块，使用ftp自己的cmd命令，就像使用shell一样，ftp-n$HOST<<!quoteUSER$USERquotePASS$PASSWDbinarycd/promptls-lfilebye!perl能够也这样使用呢

本帖最后由iakuf于2010-09-0310:20编辑转载本站文章请注明，转载自：扶凯[http://www.php-oa.com]本文链接:http://www.php-oa.com/2010/09/02/perl-test.html    我写Perl一些日子了，自己有幸和大师们学习和交流Perl，非常感谢这些人的

匹配/**/的问题如要需要替换掉程序中的/**/,应该怎么匹配?m!/\*.*\*/!复制代码这个肯定是不行的因为会包含这种/*xxx*/  abcd/*xYx*/现在需要去掉前后两个注释,应该怎么匹配?

我用perl写系统管理的页面，遇到一个问题。在cgi页面里我用system函数调用系统命令，命令执行的比较慢，页面却直接执行到了结尾，根本没有等待system函数调用的命令执行完毕，可是我还想看到命令执行好后的输出，我该怎么解决这个问题呀？~等待高人指点啊~

代码缩略如下：useSys::Syslogqw/:DEFAULTsetlogsock/;my$prog='dist';_syslog("dupliatedhost:$h");sub_syslog{      #my$syslog_facility=shift;  &nb

需求：将输入文件中匹配特定字串的前后多行打印出来。例如要在如下文件中，查找Hello：AAABBBHelloCCCDDDDEEEEFFFFFFF应该输出：AAABBBHelloCCCDDDD逐行读入处理的方法就不用说了，我就想知道如何一次读入多个连续行谢谢！