foreach my $network (keys %urls) {
    foreach my $key (keys %{$urls{$network}}) {
        print "$key<br/>";
    }
}