Select Code to Download

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

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

use strict;

...
    chomp;
    push @data, [split /,/];
}