« 通过 perl Net::SNMP 获取硬盘信息失败 | Main | 处理 FTP 站点不是在 FtpRoot 目录为基准生成的 ls-lR.gz 的 perl 正则替换代码 »
December 1, 2006
写了个 perl 递归函数 FTP do_lslR
|
版权声明：可以任意转载，转载时请务必以超链接形式标明文章原始出处和作者信息及本声明。 https://windtear.net/archives/2006/12/01/001151.html http://windtear.net/archives/2006/12/01/001151.html 写了个 perl 递归函数 FTP do_lslR 参数是目录 cwd 不成功 返回 dir 获取目录/文件列表 挨个判断 如果是目录(/^d/) 递归调用 最后返回上级目录 cwd(".."); 思路很简单 实现也很简单 个别业务相关的细节自己注意就行了 |
Posted by windtear at December 1, 2006 11:46 PM
