perl post 上传文件
15/100
zhaoyangjian724
###列出组信息
use LWP::UserAgent;
use LWP;
use Encode;
use LWP::Simple;
use LWP::UserAgent;
use HTTP::Cookies;
use HTTP::Headers;
use HTTP::Response;
use Encode;
use URI::Escape;
use URI::URL;
use JSON;
use Data::Dumper;
if ( $#ARGV < 3 ){
print "please input your username password file repo_id!\n";
print "just like 88888 1234567 aa.txt 'a3333a72-bb7f-477a-a7ed-7b05b029a9b9' ";
exit(-1);
};
my $username=$ARGV[0];
my $password=$ARGV[1];
my $file=$ARGV[2];
my $repo_id=$ARGV[3];
my $ua = LWP::UserAgent->new;
$ua->agent("Mozilla/5.0 (Windows NT 6.1; rv:30.0) Gecko/20100101 Firefox/30.0");
my $cookie_jar =
perl post 上传文件
最新推荐文章于 2021-08-13 17:39:20 发布
本文详细介绍了如何利用Perl编程语言实现HTTP POST方式上传文件,涵盖了文件读取、HTTP请求构造及发送等关键步骤,适合Perl初学者和需要处理文件上传的开发者参考。
摘要由CSDN通过智能技术生成