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ます。