windows讀取目錄檔案問題

kfcdog0419

my @names;
opendir(DIR, "./");
@names=readdir(DIR);
closedir(DIR);


以上是我的perl程式，在linux下是沒問題的，我的目的是要把當下目錄下所有檔案讀進來，存成@name
我換到windows下就會失敗，我也試過把路徑改成絕對路徑還是不能，請問是哪邊出了問題?

yeahnoob

写一小段尝试，没有遇到 LZ 描述的问题。（环境strawberry-perl-5.18.2.2-64bit, Windows8.1-64bit)

1. #!/usr/bin/env perl
   
2. use Modern::Perl;
   
3. use warnings;
   
4. use autodie;
   
5. 
   
6. opendir(my $dh, "./");
   
7. my @names=readdir($dh);
   
8. closedir($dh);
   
9. say "@names";
   
10. 
    
11. #vim :filetype=perl

复制代码