Select Code to Download

my $file_out = 'data.out';
open(my $fh_out, '>', $file_out)
   or die("Unable to create output file $file_out: $!\n");