foreach my $key (sort keys %hash) {
        printf ("%-35s : %-80s\n", $key, @{$hash{$key}});
}