windows上でPerlを使ってるんですが

opendir(DIR,"./");
while($_ = readdir(DIR)){
　print "$_," . (stat)[9] . "\n";
}
closedir(DIR);

とやっても、ファイルの更新時間が見れません。
statがWindowsでサポートされていないのであれば、
ほかに代わる方法ないでしょうか？