for my $key (sort keys %hash) {
  printf "%-12s %s\n",$key,join ' ',@{$hash{$key}};
}