my @SortedKeys = sort {$field{$a} cmp $field{$b}} keys %fields;