Select Code to Download

$VAR1 = {
          'connection-id' => {
...
                             }
....
}

foreach my $connection (keys %h) {
        foreach my $userid (keys %{$h{$connection}}) {
...
                        }
        }
}