for my $ita (sort { sort_italian() } keys %hash)