This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
devel/mktodo: Fix location of old perls
[perl5.git] / dist / Devel-PPPort / devel / mktodo
index 2eb9ea3..1cec427 100755 (executable)
@@ -35,7 +35,7 @@ my $outdir = 'parts/todo';
 
 my @perls = sort { $b->{version} <=> $a->{version} }
             map { { version => `$_ -e 'printf "%.6f", \$]'`, path => $_ } }
-            ($opt{blead}, grep !/-RC\d+/, glob "$opt{install}/*/bin/perl5.*");
+            ($opt{blead}, grep !/-RC\d+/, glob "$opt{install}/bin/perl5.*");
 
 if (exists $opt{'blead-version'}) {
   $perls[0]{version} = $opt{'blead-version'};