perl 达人快请进！！！！文件修改时间获取为空

perl 达人快请进！！！！文件修改时间获取为空
我用perl的stat函数来获取文件的修改时间，代码如下
opendir (MSGDIR,"D:/Megaco/cgi-bin/MsgFile"|| " yxz can not open it!";
@contents = readdir(MSGDIR);
closedir(MSGDIR);
foreach $ddd(@contents){
chomp $ddd;
$mtime=(stat("$ddd")[9];
print $mtime;
}


怎么获得的时间为空啊，只有2个获取到了时间，分别是.和..
其他文件怎么获取不到啊，我的系统是windows xp,后来我用stat函数获取文件的其他信息，也为空，请各位达人指教，谢谢各位了[CCB]10[/CCB]

#!/usr/bin/perl--use s.
#!/usr/bin/perl
use strict;
use warnings;

opendir MSGDIR,"c:/usr/bin/perl" || die " you can not open it!";
my @contents = readdir(MSGDIR);
closedir(MSGDIR);
foreach my $ddd(@contents){
chomp $ddd;
my @mtime=stat($ddd);
print $mtime[9],"\n";
}