Select Code to Download

my @headerArray = "a,b,c,d,e,f,g,h,i,j,k";
my $headerArrayRef = \@headerArray;
...

    my @headerArrayCopy = @$headingAref;
    print ($file "@headerArrayCopy\n"); #adds header

my $headerArrayRef = [ "a,b,c,d,e,f,g,h,i,j,k" ];

    for ($currentIndex >= $readLineFrom and $currentIndex <= $readLine
+To){

    if ($currentIndex >= $readLineFrom and $currentIndex <= $readLineT
+o){

    if ( $readLineFrom .. $readLineTo ) {