vivion32 发表于 2018-8-30 10:37:17

Perl POST请求发送

use strict;　　
use LWP;
　　

　　
my $browser = LWP::UserAgent->new();
　　
my $response= $browser->post("http://localhost/test.php?action=search", [ "keyword" => $a]);
　　
my $result = $response->content;
　　
print $result;


页: [1]
查看完整版本: Perl POST请求发送