`while` и `until` като модификатори на изречения

И while, и until могат да се използват като модификатори на изрази (по подобен начин на if и unless).

Разгледайте пример, който емулира модулно деление:

my $x = 10;
$x -= 3 while $x > 2;
say $x; # 1

Тук -= е операторът, който комбинира както изваждане, така и присвояване. В този случай, $x -= 3 е еквивалентно на $x = $x - 3.

Модификаторът while позволява изразът $x -= 3 да се повтаря, докато условието $x > 2 остава True. Щом стане False, цикълът спира.

Забележете, че ако условието е False първоначално, изразът изобщо не се изпълнява.

Същата програма може да бъде пренаписана с until. За това условието трябва да бъде обърнато:

my $x = 10;
$x -= 3 until $x <= 2;
say $x; # 1

Навигация в курса