工作中经常用到脚本发送http请求，但是用脚本发送和用浏览器发送差别很到，当你用脚本调用一些接口时可能没有权限，此时需要获取到调用接口的权限，一般情况下就是。请求的时候需要带着一个cookie值或者一个token值，浏览器发送时一般都会保存这个值，但是脚本发送不知道保存在那个地方还是不会生成（知道的小伙伴告诉我一声），但是一般的做法是带着用户名和密码去请求，服务器给你回复一个cookie值，然后下一次调用接口的时候就带着这个cookie值去请求；

获取cookie值

```
sub getCookie{my($ip，$port)=@_;my  $ua = LWP::UserAgent->new(protocols_allowed => [ 'http', 'https' ],timeout           => 30, ssl_opts => { verify_hostname => 0},);$username='admin';$password='admin';#密码有没经过加密处理，如果经过加密处理要写加密后的my $arg={'username' => $username,'password' => $password,};$url="https://$ip:$port/vapi/extjs/access/ticket";#url可以抓包获取，不是登录的那个地址my  $resp = $ua->post($url,$arg,'Content_Type' => 'form-data');#用post方法提交参数my $status=$resp->status_line;my $header=$resp->headers_as_string;#解析头部my $content = $resp->content;if ($status=~ /200/){@array=split(/\n/,$header);foreach $rock (@array){if ($rock=~/^Set-Cookie/){@Setcookie=split(/\s+/,$rock);$Setcookie[1]=~s/;$//;my $cookie=$Setcookie[1];$content=$cookie;last;}}}     return $content;
}

• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• 11
• 12
• 13
• 14
• 15
• 16
• 17
• 18
• 19
• 20
• 21
• 22
• 23
• 24
• 25
• 26
• 27
• 28
• 29
• 30
• 31
• 32
• 33
• 34
• 35
• 36

• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• 11
• 12
• 13
• 14
• 15
• 16
• 17
• 18
• 19
• 20
• 21
• 22
• 23
• 24
• 25
• 26
• 27
• 28
• 29
• 30
• 31
• 32
• 33
• 34
• 35
• 36

发送get请求

调用上面的getcookie函数，获取cookie值
sub https_Get {my ( $url,$cookie) = @_;my $ua = LWP::UserAgent->new(protocols_allowed => [ 'http', 'https' ],timeout           => 30,ssl_opts => { verify_hostname => 0 },);$ua->default_header('cookie' => "$cookie" );my $response = $ua->get($url);return $response->{_content};
}

• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• 11
• 12

• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• 11
• 12

发送post请求

sub https_Post{my($url,$arg,$cookie) = @_; #arg为需要提交的参数my  $ua = LWP::UserAgent->new(protocols_allowed => [ 'http', 'https' ],timeout           => 30,  ssl_opts => { verify_hostname => 0},);$ua->default_header('cookie' => "$cookie" );$resp = $ua->post($url,$arg,'Content_Type' => 'form-data');  #注意参数的格式是form-data还是其他格式，可用postman（一款模拟发送http请求的插件，只可以在谷歌浏览器中用）调试 $content = $resp->content;return $content;}