亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

  免費注冊 查看新帖 |

Chinaunix

  平臺 論壇 博客 文庫
最近訪問板塊 發(fā)新帖
查看: 2843 | 回復: 4
打印 上一主題 下一主題

perl跨平臺的問題 [復制鏈接]

論壇徽章:
0
跳轉(zhuǎn)到指定樓層
1 [收藏(0)] [報告]
發(fā)表于 2008-12-01 21:38 |只看該作者 |倒序瀏覽
open(F, $File::Find::name) or die "open $File::Find::name error";
binmode(F);
my $r = $loc{$File::Find::name} =
{
   # Plato Wu,2008/11/28 do not create MD5 for directory.

   md5 => -d _ ? 0 : Digest::MD5->new->addfile(*F)->hexdigest,
   mdtm => (stat(_))[9],
   size => (stat(_))[7],
   type => $type,            
};
close F;


這段代碼在linux下沒有問題,但是到Windows平臺上,首先是open不能打開目錄,然后目錄的修改時間和大小無法求到。
請問如何解決最好。

論壇徽章:
0
2 [報告]
發(fā)表于 2008-12-02 12:30 |只看該作者
打開目錄用opendir,獲取文件大小可以用-s

論壇徽章:
0
3 [報告]
發(fā)表于 2008-12-02 13:25 |只看該作者
原帖由 撒哈拉里的魚 于 2008-12-2 12:30 發(fā)表
打開目錄用opendir,獲取文件大小可以用-s

那修改時間了?
那是沒有跨平臺的代碼吧?

論壇徽章:
0
4 [報告]
發(fā)表于 2008-12-02 15:48 |只看該作者
我記得有個FILE模塊可以跨平臺的吧

論壇徽章:
0
5 [報告]
發(fā)表于 2008-12-03 12:08 |只看該作者
原帖由 net_robber 于 2008-12-2 15:48 發(fā)表
我記得有個FILE模塊可以跨平臺的吧

謝謝,用File::stat搞定!
您需要登錄后才可以回帖 登錄 | 注冊

本版積分規(guī)則 發(fā)表回復

  

北京盛拓優(yōu)訊信息技術有限公司. 版權所有 京ICP備16024965號-6 北京市公安局海淀分局網(wǎng)監(jiān)中心備案編號:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年舉報專區(qū)
中國互聯(lián)網(wǎng)協(xié)會會員  聯(lián)系我們:huangweiwei@itpub.net
感謝所有關心和支持過ChinaUnix的朋友們 轉(zhuǎn)載本站內(nèi)容請注明原作者名及出處

清除 Cookies - ChinaUnix - Archiver - WAP - TOP