Select Code to Download

   #open(FILE, my $aref); #or die "Cannot open: $file\n";

open(FILE, $aref) or die "Cannot open: $file\n"; 
$line = <FILE>;