Senhores bom dia estou rodando o seguinte script <br><br>#!/usr/bin/perl<br> <br>use File::Find;<br>use ExtUtils::MakeMaker;<br> <br>find(<br> sub {<br> next unless /.pm$/i;<br> my $mod = $File::Find::name;<br>
$mod =~ s/^$File::Find::topdir\/?//;<br> $mod =~ s/\.pm$//i;<br> $mod=~s!/!::!g;<br> my $ver=MM->parse_version($File::Find::name);<br> print "$mod ($ver)\n"<br>
},<br> @INC<br>)<br><br><br>e esta ocorrendo o seguinte erro.<br><br>autoflush_epic (undef)<br>dumpvar_epic (undef)<br>Insecure dependency in chdir while running with -T switch at /usr/share/perl/5.10/File/Find.pm line 768.<br>
<br><br>Poderiam me ajudar a resolver?????<br>