for文のバックアップ(No.2)

for 文

Tcl/Tk

for {set i 1} {$i <= 5} {incr i} {
    if {$i < 3} {
        continue
    }

    puts stdout $i
}

Excel VBA

For i% = 1 To 10
    Worksheets("Sheet1").Cells(i, 1).Value = i

    If (i% = 1) 
        Exit For　　　　'// ループの脱出
    }

Next i%

foreach {i j} {A B C D E F} {
   puts stdout "$i $j"
}

=> A B
=> C D
=> E F

注意
ループさせる値にリストの入った変数を指定する場合は、 { } で囲わない。

foreach name  $file_list {           # $file_list はすでにリストなので { } で囲うと期待通り動作しない
    puts $name;
}