Don't show aliased perl version numbers twice in corelist -a output
Rafael Garcia-Suarez [Tue, 20 Apr 2010 13:14:45 +0000 (15:14 +0200)]
(bug [rt.cpan.org #56739])

dist/Module-CoreList/corelist

index b59aef3..f853f26 100644 (file)
@@ -180,7 +180,7 @@ sub module_version {
     print "\n",$msg,"\n";
 
     if(defined $ret and exists $Opts{a} and $Opts{a}){
-        for my $v(
+        for my $v( grep !/000$/,
             sort keys %Module::CoreList::version ){
 
             printf "  %-10s %-10s\n",