Select Code to Download

foreach(@aoh)
{
   my %a = %$_;
   my %c= reverse %a;

 {
    3 => 15,
    4 => 8,
    5 => 8,
 },

   my %c = reverse %$_;