Select Code to Download

while( my( $key1, $ref1 ) = each %hash ) {
  while( my( $key2, $val2 ) = each %{$ref1} ) {
    push @Array, { $key2 => $val2 };
  }
}