my %HoH;
$HoH{ $_->[ 0 ] }{ $_->[ 1 ] } = [ $_->[ 2 ] .. $_->[ 3 ] ] for @AoA;