OZの部屋
なんでも日記です
 



wget を使わないで perlでlwp モジュールで簡単に通信可能なことがわかった。
でも、https通信でsquid を通してのものはsquid がエラーをかえしてしまう。
use LWP::UserAgent;
use HTTP::Request::Common qw(GET);

$ENV{'https_proxy'}='http://proxy:8080';

# リクエストの生成
my $url = 'https://httpsite/';
my $request = GET($url);

# UserAgentを生成して処理
my $ua = LWP::UserAgent->new;
$ua->env_proxy;
my $res = $ua->request($request);
print $res->as_string;

*************************************


結果はproxy がBad request エラー 400
で通信できない。
wget https://httpsite/
ではOK

しらべてみたところ
http://rt.cpan.org/Public/Bug/Display.html?id=1894

バグフィックス対象になっているようだ
これが解消されないことには使えない。
しばらくは wgetを使ってゆくしかないようだ。

コメント ( 0 ) | Trackback ( 0 )



« wgetでpost ... LWPで簡単http... »
 
コメント
 
コメントはありません。
コメントを投稿する
 
名前
タイトル
URL
コメント
コメント利用規約に同意の上コメント投稿を行ってください。
数字4桁を入力し、投稿ボタンを押してください。
 
この記事のトラックバック Ping-URL