Help for this page
grep{$_} .......
grep{defined $_} .....
@array -1
$#array
map{[ grep {defined} @array[$_*$len..$_*$len+$len-1] ]} 0..$#array/$len