Perl用LWP实现GET/POST数据发送

1. GET ，获取网页内容，3句话，很简单吧！

#!perl -w
use strict;
use LWP;

my $browser = LWP::UserAgent->new();
my $response= $browser->get("http://www.toolmao.com");

print $response->content; # 输出获得的网页内容

2. POST，发送数据

#!perl -w
use strict;
use LWP;

my $browser = LWP::UserAgent->new();
my $response= $browser->post("http://www.toolmao.com", [ "test" => 123 , "data" => "gainover"]); #多加了一个被发送的数据的数组

print $response->content; # 输出获得的网页内容

3. multipart/form-data 类型的，一般上传文件的时候会用到

#!perl -w
use strict;
use LWP;

my $browser = LWP::UserAgent->new();

my $response = $browser->post(
'http://www.toolmao.com',
[ 'subject' => 'test for toolmao.com',
'uploadfile' => ["./file/工具猫.txt"],    #这里是被上传的文件路径
    'user'    => 'Adm. Kang',
],
'Content_Type' => 'form-data'                          #这句不可少，表示类型为 multipart/form-data
);

print $response->content; # 输出返回的网页内容更多的用法，例如设置User-Agent, cookies等，可以查看perl手册里关于lwp的用法部分！

转载于:https://blog.51cto.com/soige/385202

Perl用LWP实现GET/POST数据发送相关推荐

Perl用LWP实现GET/POST数据发送原
1. GET ,获取网页内容,3句话,很简单吧! #!perl -w use strict; use LWP; my $browser = LWP::UserAgent->new(); my $ ...
socket通信——通过Udp传输方式，将一段文字数据发送出去
需求:通过Udp传输方式,将一段文字数据发送出去定义一个Udp发送端思路: 1.建立updsocket服务 2.提供数据,并将数据封装到数据包中. 3.通过socket服务的发送功能,将数据包发出 ...
Linux内核网络数据发送（六）——网络设备驱动
Linux内核网络数据发送(六)--网络设备驱动 1. 前言 2. 驱动回调函数注册 3. `ndo_start_xmit` 发送数据 4. `igb_tx_map` 1. 前言本文主要介绍设备通过 ...
Linux内核网络数据发送（五）——排队规则
Linux内核网络数据发送(五)--排队规则 1. 前言 2. `qdisc_run_begin()` and `qdisc_run_end()`:仅设置 qdisc 状态位 3. `__qdisc_ ...
微信 php post json,微信企业号：如何POST JSON数据发送消息给企业号成员
根据企业号开发者文档的发送消息接口消息数据格式,要想向企业号成员发送消息必须用POST方式将JSON数据发送到指定的包含ACCESS_TOKEN的URL. 我想实现的是每隔一段时间间隔,查询数据库之后 ...
linux 内核发送数据,linux 内核tcp数据发送的实现
在分析之前先来看下SO_RCVTIMEO和SO_SNDTIMEO套接口吧,前面分析代码时没太注意这两个.这里算是个补充. SO_RCVTIMEO和SO_SNDTIMEO套接口选项可以给套接口的读和写, ...
as3 访问远程计算机,Flash AS3中数据发送与接收
Flash AS3中数据发送与接收互联网发布时间:2008-10-06 01:24:53 作者:佚名我要评论先回顾一下as2中相关的解决办法相信大部分人用的都是LoadVars类 ...
nrf51822-提高nordic ble数据发送速率
讲解2点: 为什么 nordic的4.0协议栈中ble只能发送20字节的应用负载数据. 大量数据发送时如何提高发送速率 1:为何上层应用负载每次最多20字节首先了解 4.0中链路层的包格式如下: P ...
Request.InputStream 将数据作为XML数据发送
将数据作为XML数据发送,例如: public voidPostXml(stringurl, stringxml) { byte[] bytes = Encoding.UTF8.GetByte ...

Perl用LWP实现GET/POST数据发送

Perl用LWP实现GET/POST数据发送相关推荐

最新文章

热门文章