use strict;
use warnings;

my $hash;
$hash->{"AAA"}->{"KEY1"} = "VALUE1";
$hash->{"AAA"}->{"KEY2"} = "VALUE2";
$hash->{"AAA"}->{"KEY3"} = "VALUE3";
$hash->{"AAA"}->{"KEY9"} = "VALUE3";
$hash->{"AAA"}->{"KEY10"} = "VALUE3";
$hash->{"AAA"}->{"KEY123"} = "VALUE3";
$hash->{"AAA"}->{"KAY1"} = "VALUE1";
$hash->{"AAA"}->{"KAY2"} = "VALUE2";
$hash->{"AAA"}->{"KAY3"} = "VALUE3";

my @result = sort keys %{$hash->{"AAA"}};
print "@result\n";