Select Code to Download

    use Symbol;
    my $N = 15;
...
        open $fh, ">$i.txt" or die "Can't open $i.txt: $!";
        push @FH, $fh;
    }

    open my $fh, ">$i.txt" or die "Can't open $i.txt: $!";