2011-06-01 87 views
1

是否可以发送休息请求,包括perl/shell脚本/命令行中的标头验证。并获得回应?使用Perl发送休息请求

+2

这里点这里。你不发送“休息请求”。您发送HTTP请求。 – 2011-06-01 10:48:22

回答

5

事情是这样的,如果你要处理的结果在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。只是我发现的第一个需要基本认证的随机页面。

+0

此代码不显示,但是,您可以设置请求标头和内容。请参阅perldoc:http://search.cpan.org/~gaas/libwww-perl-6.02/lib/LWP/UserAgent.pm – ijw 2011-06-01 10:27:48

+0

@ijw:好的,我添加了一个简短的例子。 – ADW 2011-06-01 10:50:16

+0

这很好用+1,我使用了default_header而不是凭据,我真的是新的Perl。你能告诉我或者直接给我这个正确的资源:我如何检查响应是否是xml,如果响应代码是200?谢谢 – 2011-06-01 12:55:04