Select Code to Download

open(FILE,"$_") or die " Could not open file :$! " ;

open my $file, '<', $_ or die "Could not open `$_': $!\n";