モジュールを使わずにhttpアクセスするには

質問

レンタルサーバ上に置いた perlプログラムで
他サイトのページの内容を httpアクセスして取り出そうと思っています。
サーバの制限がきつくて LWP::Simpleなどのモジュールを全く使えないのですが、
どのようにして httpアクセスをさせればよいのでしょうか。
URLを投げてページの内容をテキストファイルで取り出すという
単純なことができれば充分です。

回答No.1

BLUEPIXY · ベストアンサー

まったくモジュールを使わずというのは、ムリだと思います。
標準モジュールのIO::Socketが使えれば、以下のようにしてGETできるはずです・
#--------------------------------------------------------------
use IO::Socket;

my ($sock) = IO::Socket::INET->new(
PeerHost => "www.sample.ne.jp",
PeerPort => 80,
Proto => 'tcp');
eval {
$sock->print("GET /index.html HTTP/1.0\r\n");
$sock->print("\r\n");
print <$sock>;
};
$sock->close();
if($@) {
die $@;
}

お礼

ご回答ありがとうございます。
添付いただいたソースを元にして実装したところ
ローカルでは動きましたが
レンタルサーバ上では残念ながらGETはできませんでした。
他のもっと制限のゆるいレンタルサーバを探す事にします。

回答No.2

2NN

Socketモジュールで可能ですが、
これも使えないようなら厳しいかと思います。

参考URL：

http://www.google.com/search?lr=lang_ja&hl=ja&q=perl%20socket

お礼

ご回答ありがとうございます。
Socketを実装したところローカルでは動きましたが
レンタルサーバ上では残念ながらGETはできませんでした。
他のもっと制限のゆるいレンタルサーバを探す事にします。