perl 如何发送http请求

andylei

UID: 1924
帖子: 33
积分: 75
在线时间: 1 小时

1^# andylei 发表于 2008-12-29 16:08

perl 如何发送http请求

请教各位高手一个问题，我有一堆http请求如下：

Request:

POST /XXApi/services/ProjectHelper HTTP/1.1

Connection: Keep-Alive

Content-Type: text/xml

Content-Length: 328

Cache-control: no-cache

SOAPAction: "callXXX"

Host: xxx.com:8080

Accept: text/html, */*

Accept-Encoding: identity

User-Agent: Example

<?xml version="1.0"?>

<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlnssd="http://www.w3.org/2001/XMLSchema" xmlnssi="http://www.w3.org/2001/XMLSchema-instance">

<SOAP-ENV:Body>

<calXXX xmlns="http://xxx.com">

<id>888</id>

</calXXX >

</SOAP-ENV:Body>

</SOAP-ENV:Envelope>

请问一下，如何使用perl 直接发送？

odacharlee

UID: 7090
帖子: 37
积分: 85
在线时间: 2 小时

2^# odacharlee 发表于 2008-12-29 16:18

去CPAN上找LWP吧

撒哈拉里的鱼

UID: 25861
帖子: 2
积分: 4
在线时间: 10 分钟

3^# 撒哈拉里的鱼发表于 2008-12-29 21:51

他这个是在访问WebService，去用WebService方面的模块吧，不用自己POST

chinatzbcn

UID: 22444
帖子: 1
积分: 2
在线时间: 10 分钟

4^# chinatzbcn 发表于 2008-12-30 08:34

my $url = "http://www.baidu.com";

my $ua = LWP::UserAgent->new();
my $req = GET $url;
my $page_str= $ua->request($req)->as_string;

这个是GET方法

返回的请求是一串字符串(HTML CODE)

尝试把发送东西做为URL的参数。但是你的好象是直接发包的吧.

fangdingj

UID: 18967
帖子: 168
积分: 386
在线时间: 1 天 14 小时

5^# fangdingj 发表于 2008-12-31 11:06

我也一直在找怎样发个XML文件内容到服务器上去，POST 去的数据都是这样的 user=aaa&passs=asdff&login=1