my @arrays = map([ @inarray[$_*15 .. ($_*15+14<$#inarray?$_+14:$#inarray)] ],(0..int($#inarray/15)));