printf "%s\n", join("\n",map { $_ . " " . $hash{$_} }
                            sort keys %hash);