Select Code to Download

foreach $QB1(sort keys $Hash)
  {
...
       }#end $QB2 foreach loop
    }#end $QB1 foreach loop

'113' => {
         'Name'=>'John',
...
         'Age'=>'25',
         'Sex'=>'No Way'
         }