foreach my $domain (sort {$a cmp $b} keys %{$hash}) {
   my $value = $hash->{$domain}$test;
}