File:Find 问题

justin764

请问， Active Perl 中的 File:Find  支持超长文件名的查找吗？ File:Find 版本是：1.12 ，最新的1.14也试过，perl版本是：5.10.0.1004，看如下代码：

use strict;
use File::Find;

my $dest_dir=shift @ARGV;
my $sysvol='System Volume Information';
my $recycle='RECYCLER';



find(\&get_dest,$dest_dir);
sub get_dest{
   print "$File::Find::name \n" ;
}

当查找目录中有文件名长达上百个汉字的文件时，windows会跳出个询问是否发送错误报告的框出来，说perl遇到错误需要关闭。请问这怎么解决？

solasoca

这个估计是active perl的限制，不好解决。
也行下个版本出来就OK了，呵呵

兰花仙子

刚有人问了这个问题，见：
http://bbs3.chinaunix.net/thread-1609029-1-1.html