Select Code to Download

sub StartInternet {
    $Internet = Win32::Internet->new
...
        return undef
    }
}

$url = 'terraserver.microsoft.com';
$req = 'tile/tile.asp?T=1&S=13&X=321&Y=3329&Z=10'

terraserver-usa.com/tile.ashx?T=1&S=13&X=321&Y=3329&Z=10