my @allmodules = map{ ... } @INC;
...
for my $module ( @allmodules ) {
    print "$module :", `perl -M$module le"\$${module}::VERSION"`;
}