new(); my $agent = LWP::UserAgent" />
红联Linux门户
Linux帮助

请问 我这样写perl传参数到网页为什么不可以.

发布时间:2008-02-27 15:49:56来源:红联作者:xjf123
sub postUrl{
my $passNum = @url_success_type;
my $errorNum = @url_faile_type;
my $count = @url_type;
print "$count,$errorNum,$passNum\n";
my $query = CGI->new();
my $agent = LWP::UserAgent->new();
my $url = URI->new('http://ibio.genv.com/temp_xu/Test_Mail/sendMail.php');
$url->query_form('url_error_list'=>@url_faile_type, 'url_list'=>@url_list, 'pro_num'=>$count, 'error_num'=>$errorNum, 'success_num'=>$passNum
);
my $response = $agent->get($url);
}
文章评论

共有 0 条评论