my $fmt = "%-7s %-@{[max map length, keys %$hash]}s ";