download fil fra hjemmeside

Spørgsmålet er ikke forstået. Hvad er det du vil?

Jeg vil have et script til at download filer fra en hjemeside til min egen computer

hvorfor ikke bare bruge wget?

Du skal bruge LWP::UserAgent:
----------------------------------------
use LWP::UserAgent;
use URI::Escape;

my $ua = new LWP::UserAgent;
$ua->agent("IE/5.0");
$ua->env_proxy;

$_ = &fetch("http://www.somewhere.dk/somfile.htm");

sub fetch {
    my $url = shift;

    my $request = new HTTP::Request('GET',$url);
    my $response = $ua->request($request);

    die "$url failed: ",$response->error_as_HTML unless $response->is_success;
    $HTML = $response->content
}