Help for this page

Select Code to Download


  1. or download this
    use List::Util qw( sum );
push @Res, sum splice(@arr,0,3) while @arr;