print join(', ', map { $_ . _ => ' . $hash{$_} } sort { $a cmp $b } keys(%hash), "\n";