Select Code to Download

use strict;
use warnings;
use LWP::Simple;
...
open(IN, "<$file") || die "Can't open $file: $!";

close(IN);