use File::Copy ();
use File::Path ();
use ExtUtils::Packlist;
+use Cwd;
use Config;
use subs qw(unlink link chmod);
$perldll =~ s/(\..*)?$/$v_e_r_s.$dlext/;
$perldll =~ s/^lib/cyg/;
} else {
- $perldll = 'perl59.' . $dlext;
+ $perldll = 'perl511.' . $dlext;
}
if ($dlsrc ne "dl_none.xs") {
# Use &samepath here because some systems have other dirs linked
# to $mainperldir (like SunOS)
next if samepath($_, $binexp);
+ next if samepath($_, cwd());
next if ($mainperl_is_instperl && samepath($_, $mainperldir));
my $otherperl = "$_/$perl$exe_ext";
next if $otherperls{$otherperl}++;