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

Question

  

可能重复：
  Download files with 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。