sub lolize{
	my($size, $arrayref)=@_;
	my @returnarray=();
	my $count=0;
	while($count<=$@arrayref){
		push @returnarray, [splice(@$arrayref,$count, $count+$size-1)];
		$count+=$size;
	}
	return [@returnarray];
}