lwp

    0热度

    1回答

    我试图在Perl中使用LWP :: Simple从联合国网站(安理会决议等)下载一些PDF文档。然而,我没有返回PDF,而是收到一个HTML错误页面。考虑这个非常简单的例子: use LWP::Simple; use strict; my $url = 'https://documents-dds-ny.un.org/doc/UNDOC/GEN/N16/100/02/PDF/N1610002

    1热度

    1回答

    我曾尝试下面的代码 my $url = "https://api.box.com/2.0/users/"; use strict; use warnings; use LWP::UserAgent; use HTTP::Request::Common qw{ POST }; use CGI; my $ua = LWP::UserAgent->new(); my $reques

    1热度

    1回答

    我使用草莓的Perl 5.22,并尝试运行folllowing代码: use strict; use warnings; use LWP::UserAgent; my $ua = LWP::UserAgent->new(); my $response = $ua->get('https://ransomwaretracker.abuse.ch/feeds/csv/'); if ($

    0热度

    1回答

    #!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; my $ua = LWP::UserAgent->new( agent => 'Mozilla/5.0 (Macintosh; Intel Mac OS X 10_12_5) AppleWebKit/603.2.4 (KHTML, like Gecko)

    0热度

    1回答

    我试图检索使用LWP :: UserAgent的页面,但我不断收到一个“500内部服务器错误”作为响应。在Firefox中检索完全相同的页面(使用全新的“私人窗口” - 所以没有任何Cookie设置)成功没有问题。 我重复了与Firefox发送完全一样的标题,但这仍然没有什么区别。这里是我的完整代码: use strict; use LWP::UserAgent; my $browserOb

    0热度

    1回答

    这是我处理参数Perl的问题。我需要将perl参数参数传递给http请求(Webservice),无论给perl文件的参数如何。 perl wsgrep.pl -name=john -weight -employeeid -cardtype=physical 在wsgrep.pl文件中,我需要将上述参数传递给http post params。 像下面, http://example.com/q

    1热度

    1回答

    看着UserAgent.pm似乎是不确定的。至少,据我所知,当例程到达该部分时,它是不确定的,尽管我明确地将其设置为$pua->agent()。这是一个错误?还有init_header(),但是当我尝试$pua->request->init_header()时,它也未能设置。 #!/bin/perl use LWP::Parallel::UserAgent; my $ua_string =

    3热度

    2回答

    我使用LWP::Simple来获取一个网页,其中有几个格式不正确的字符。我打电话给.get。而不是,我想解码插入replacement characters在困惑的部分,并继续前进。 它看起来像回应是一个Buf对象和使用该.decode。我仍然在调查,但缺乏文档使这比应该更困难。

    3热度

    2回答

    我试图使用特定的网络服务,我可以成功地用下面的命令进行上传: curl -X POST --header "Transfer-Encoding: chunked" -d @Downloads/file.pdf https://some.webservice/upload 我得到一个JSON响应表示成功。 但是,我无法弄清楚如何在WWW :: Mechanize中做同样的事情。 $mech->p

    1热度

    1回答

    我已经通过下面的脚本成功登录到网页,但网页卡在重定向页面。我不知道如何通过它。下面是我的代码 use strict; use warnings; use LWP::UserAgent; use HTTP::Request::Common qw(POST); use HTTP::Cookies; my $URL="http://www.redirect.com"; my $UA = L