繰り返し

perl

for

for (my $i=0; $i<5;$i++){
  print 'どんつー';
}
# どんつーどんつーどんつーどんつーどんつー

foreach

foreach my $line (@lines){
  print $line. "\n";
}

while

while(条件式)
条件式の値が真の間、繰り返される

my $n = 0;
while ($n < 9){
  print $n. "\n";
  $n ++;
}

last

繰り返しを終了する

for (my $i=6; $i<12;$i++){
  if ($i == 9){
    last;
  }
}

next

次の繰り返しに入る

for (my $i=6; $i<12;$i++){
  if ($i < 9){
    next;
  }
}