perl - 如何从 URL 读取和存储电子表格

Question

可能重复：
使用 Perl 下载文件

我是 Perl 的新手，我需要访问一个 url 来读取和存储 url 中存在的 excel 文件，即 url 的类型为 www.abc.com/xyz.xls。你能提供一个简单的例子吗？我在工作中迫切需要它。

Answer 1

要下载文件，请使用 LWP::Simple：

use LWP::Simple qw(getstore);
getstore( "http://www.example.com/foo.xls", "foo.xls" );

这就是下载文件所需的全部内容。 更新：无法正常工作？以下是添加一些错误处理的方法：

use strict;                     #standard good practice
use warnings;                   #ditto
use LWP::Simple qw(getstore);
use HTTP::Status;               #Get the HTTP error messages

my $status = getstore( "http://www.example.com/foo.xls", "foo.xls" );
print status_message($status);

如果您需要在 Perl 中访问文件的内容，这有点复杂。查看Spreadsheet::ParseExcel或Win32::OLE。