Select Code to Download

$VAR1 = [
          {
...
            'street' => 'Mission'
          }
        ];

foreach my $key ( sort keys %{$result} ) {
   print "$key\n";
   }