Select Code to Download

@array = ([1,2,3],[5,5,6],[1,4,6]);

my $loop_index = 0;
for $comma_array (@current_case_commas)
...
      }
      $loop_index+=1;
}

push @array, split(/[\s|\t]+/,$list_of_num);