my $data = [
[],
[3],
[10,10],
[10,10,3],
[10,10,3,3],
[10,10,3,2,3],
[10,10,3,3,3,3],
[10,10,7,10,7,8,10]
];