Select Code to Download

open my $in, "<:encoding(UTF-8)", "in_file.csv"
    or die "in_file.csv $!";
...
    }
}
close $out;