如何使用Perl下载文件？

我在Windows XP上运行perl，我需要从以下URL下载一个文件。 http://marinetraffic2.aegean.gr/ais/getkml.aspx

任何想法如何我应该这样做？我尝试使用WWW :: Mechanize但我不能让我的头。

任何帮助赞赏。这是我使用的代码：

my $url = 'marinetraffic2.aegean.gr/ais/getkml.aspx';
my $mech = WWW::Mechanize->new;
$mech->get($url);

解决方法

我会用 LWP::Simple这个。

#!/usr/bin/perl

use strict;
use warnings;

use LWP::Simple;

my $url = 'http://marinetraffic2.aegean.gr/ais/getkml.aspx';
my $file = 'data.kml';

getstore($url,$file);