Select Code to Download

my @data = [1,5,7,8,9,10,11,3,3,5,5,5,7,2,2];

1,5,7,8,9,10,11,3,3,5,5,5,7,2,2

(@histofeld) = split(',',$input[$i]);