حلقه‌ها

while — تا وقتی شرط درست است

my $i = 1;
while ($i <= 5) {
  say "شمارش: $i";
  $i++;
}

until — تا وقتی شرط غلط است

my $n = 100;
until ($n < 10) {
  say $n;
  $n = int($n / 2);
}

for — سبک C

for (my $i = 0; $i < 5; $i++) {
  say "i = $i";
}

سه بخش در یک خط: مقدار اولیه؛ شرط؛ تغییر — برای شمارش‌های کلاسیک.

for معکوس

for (my $i = 5; $i >= 1; $i--) {
  say "$i...";
}
say "پرواز! 🚀";

حلقه‌های تودرتو

for (my $i = 1; $i <= 3; $i++) {
  for (my $j = 1; $j <= 3; $j++) {
    print "$i x $j = " . ($i * $j) . "  ";
  }
  print "\n";
}

کدام را کِی؟

خلاصه

• while: تا وقتی درست / until: تا وقتی غلط
• for C: (init; cond; incr)
• foreach برای لیست‌ها — مبحث بعد!