Select Code to Download

use strict;
use warnings;
use Data::Dumper;    # for Dumper()

open my $fh1, '>', "Output by RID.txt" or die "Cannot open output.txt:
+ $!";