Select Code to Download

   my %hash = ( ..... );
   foreach my $key1 (@keyset1) {
...
          print $inner->{$key2};
      }
   }

   my %hash = ( ..... );
   foreach my $key1 (@keyset1) {
...
          print $hash{$key1}{$key2};
      }
   }