会员
周边
众包
新闻
博问
闪存
赞助商
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
becodin
博客园
首页
新随笔
联系
订阅
管理
2014年1月2日
通过perl获得F盘下的所有文件名
摘要: 1 $PATH="F://E-Book";2 opendir(DIR,$PATH);3 @array=readdir(DIR);4 close(DIR);5 foreach $fn(@array){6 if ($fn ne '.' and $fn ne '..') {7 print "$fn\n";8 }9 }
阅读全文
posted @ 2014-01-02 10:48 becodin
阅读(175)
评论(0)
推荐(1)
编辑
公告