X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/36512bd8db85eeea6f683296e5f830f6ffb32116..d13df5d77ce275e62b0fb02836cfbf1eb7d6ce68:/Porting/corecpan.pl

diff --git a/Porting/corecpan.pl b/Porting/corecpan.pl
index 647696b..0a6086c 100644
--- a/Porting/corecpan.pl
+++ b/Porting/corecpan.pl
@@ -155,11 +155,12 @@ if ($opt_t) {
 }
 else {
     for my $dist (sort { lc $a cmp lc $b } keys %results) {
-	print "Module $dist...\n";
+	my $distname_printed = 0;
 	for my $file (sort keys %{$results{$dist}}) {
 	    my ($vcore, $vcpan) = @{$results{$dist}{$file}}{@labels};
 	    if (our $opt_v or $vcore ne $vcpan) {
-		print "    $file: core=$vcore, cpan=$vcpan\n";
+		print "\n$dist:\n" unless ($distname_printed++);
+		print "\t$file: core=$vcore, cpan=$vcpan\n";
 	    }
 	}
     }