Have a look at LWP::Simple to start with.

use LWP::Simple;
my $url = "http://www.foo.com/mp3s/foo.mp3";
my $file = "/path/to/local/file/foo.mp3";
getstore($url, $file);
[download]

Plus some error handling and "use strict;" and maybe some more features and you'll be lucky.

alex pleiner <alex@zeitform.de>
zeitform Internet Dienste