Сеть TCP в Gawk работает для некоторых адресов, но не для других

Я возился с сетями TCP / IP в Gawk и с трудом выясняю, почему он работает хорошо на некоторых сайтах, но не на других. Я даже пытался использовать HTTP Live Headers в Windows, чтобы попытаться отладить происходящее, но безрезультатно.

Пример кода Gawk ниже (версия 3.1.5) будет хорошо работать для сайта www.sobell.com, но будет висеть на www.drudgreport.com.

BEGIN {
print "Dumping HTML of www.sobell.com"

server = "/inet/tcp/0/www.sobell.com/80"
print "GET http://www.sobell.com" |& server
while ((server |& getline) > 0)
    print $0
close(server)

print "Dumping HTML of www.drudgereport.com"

server = "/inet/tcp/0/www.drudgereport.com/80"
print "GET http://www.drudgereport.com" |& server
while ((server |& getline) > 0)
    print $0
close(server)

}

Я ценю любую помощь! Спасибо всем.

1
задан Dennis Williamson 1 September 2010 в 00:43
поделиться