使用Perl发送休息请求

Question

是否可以发送rest请求，包括perl / shell脚本/命令行中的头认证。得到回应？

Answer 1

如果你想在Perl中操作结果，那就是这样：

use strict;
use warnings;
use LWP::UserAgent;

my $ua=LWP::UserAgent->new;

my $result=$ua->get("http://www.google.com/");

print $result->content;

或者，基本的HTTP身份验证是这样的：

use strict;
use warnings;
use LWP::UserAgent;

my $ua=LWP::UserAgent->new;

$ua->credentials("www.pagetutor.com:80","My Secret Area","jimmy","page");

my $result=$ua->get("http://www.pagetutor.com/keeper/mystash/secretstuff.html");

print $result->content;

有关密码的来源，请参阅http://www.pagetutor.com/keeper/http_authentication/index.html。只是我找到的第一个需要基本身份验证的随机页面。