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