使用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; 本文共 259 字，大约阅读时间需要 1 分钟。
使用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; 转载于:https://blog.51cto.com/417722381/1881180