socket通信でレスポンスを受け入れないようにするにはどうすればいいですか？

質問

socket SOCKET,2,1,0;
select((select(SOCKET),$|=1)[0]);
connect(SOCKET,pack('Sna4x8',2,80,scalar(gethostbyname('www.test.test'));
print SOCKET "GET /test.cgi HTTP/1.1\r\n\r\n";

こんな感じでhttp://www.test.test/test.cgiをリクエストしているのですが、結果がわかっているので、レスポンスが必要ありません。
どうもリクエストが終わると<SOCKET>を実行しないでも勝手にレスポンスをサーバから読み込んでいるみたいです。
（なのでリクエストを送った後、ある程度の時間をおいてオフライン状態にしても<SOCKET>からレスポンスを読み取れます）
レスポンスの結果は分かっているので読み込みたくないのですが、どうすればいいのでしょうか？

回答No.1

11th_style

closeを使えば、その時点で接続が切れるはずです。
もしくは、相手先のサーバが対応していれば、GETの代わりにHEADを使うと言うのはいかがでしょう？？