perl6 Rakudo Star 2018.01. : $s+=$x++ while $x < $y; perl5.
!
https://ru-perl.livejournal.com/446794.html