如何编写 Perl 脚本以使用 curl 处理 URL？

Question

我有一个非常简单的任务。 我有一个 crontab，它将每小时运行一个脚本。 该脚本旨在简单地处理 URL。

这就是我所拥有的。 它不起作用。 我收到语法错误。

#!/usr/bin/perl
curl http://domain.com/page.html;

我已经很多年没有在 Perl 工作了，而且我做的时候也不是很熟练。

解决方案

谢谢，亚历克斯为我指出了正确的道路！

定时任务表

*/30 * * * * curl http://domain.com/path.html

Answer 1

您可以通过反引号使用curl

my $curl=`curl http://whatever`

或者你可以使用WWW::Curl 。

Answer 2

要从 Perl 调用任何 shell 命令，您可以使用system ：

system "curl http://domain.com/page.html";

只需将 shell 命令括在引号中即可。

Answer 3

如果避免使用 Perl 执行命令行工具，则库的等效项是

use WWW::Curl::Simple;
my $curl = WWW::Curl::Simple->new();
my $res = $curl->get("https://stackoverflow.com");

然后您访问的内容如下

print $res->content;

您可能想阅读https://metacpan.org/pod/WWW::Curl::Simple并且 get 方法返回一个https://metacpan.org/pod/HTTP::Response 。

Answer 4

如果您需要传递多个参数，请尝试此操作。

my $cc = 'curl -v -X GET https://base-template.squarespace.com/blog/\?field1=value1\&format=json-pretty\&field3=value3';
print `$cc`;