+ -
当前位置:首页 → 问答吧 → perl LWP::UserAgent POST问题

perl LWP::UserAgent POST问题

时间:2011-07-07

来源:互联网

本帖最后由 mitmax 于 2011-07-07 16:53 编辑

perl 通过HTTP::Request 指定ip get网页是可以的但是post为什么不行
  1. sub get_url {
  2.     my $req = HTTP::Request->new( GET => "https://192.168.100.1/llaaaa" );
  3.     $req->header( 'Accept' => 'text/html', 'Host' => 'www.test.com' );
  4.     return my $response = $ie->request($req);
  5. }
复制代码


这个不行
  1. sub post_url {
  2.     my $req = HTTP::Request->new( POST => 'https://192.168.100.1/?user=test&pass=123456');
  3.     $req->header( 'Accept' => 'text/html', 'Host' => 'www.test.com' );
  4.     return my $response = $ie->request($req);
  5. }
复制代码

作者: mitmax   发布时间: 2011-07-07

post得把user,pass等参数用匿名哈希提交。

作者: x9x9   发布时间: 2011-07-07