I’d use LWP::Simple for this.
#!/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);
I’d use LWP::Simple for this.
#!/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);