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