Select Code to Download

    foreach $line (@lines){
        chomp $line;
...
        @$row = split(/,/, $line );
        push @$sheet2 , $row;
    }

my @sheet2 = ()

...
        @row = split(/,/, $line );
        push @sheet2 , \@row;
    }

@$sheet2 = ();

@sheet2 = ();

$sheet2 = [];