Select Code to Download

#    1675147    http://download.windowsupdate.com/
#    531450    http://ads.icq.com/
...
#    299397    http://rad.msn.com/
#    255706    http://web.icq.com/
#    255578    http://www.google.com.au/

#!/usr/bin/perl

...
close OUT;
print "Done. Got " . scalar(keys %urls) . " unique domains\nWrote $OUT
+FILE\n";