Help for this page
my @fifth = @arr[ map {$_*5-1} 1..$#arr+4/5 ];
my @fifth = @arr[ map {$_*5-1} 1..($#arr+4)/5 ];
my @fifth = @arr[ map {$_*5-1} 1..($#arr+1)/5 ];