Select Code to Download

use LWP::Simple 'getstore';
my $url = 'http://some.domain.com/image.gif';
my $file = '/tmp/image.gif';
getstore( $url, $file );

open F, ">$file" or die "Could not write $file Perl says reason $!\n";
binmode F;   # may be important does no harm it not needed