- or download this
sub _array_chunk5 {
my @arr = @_;
...
# what goes here ?
return ( join( " ", splice ( @arr, 0, 5 ) ) , _array_chunk5(@arr)
+ );
}
- or download this
sub _array_chunk5x {
my @arr = @_;
return ( ) if(@arr == 0);
return ( join( " ", splice( @arr, 0, 5 ) ), _array_chunk5(@arr) );
}