RosettaCodeData/Task/Conditional-structures/Tcl/conditional-structures-1.tcl

if {$foo == 3} {
    puts "foo is three"
} elseif {$foo == 4} {
    puts "foo is four"
} else {
    puts "foo is neither three nor four"
}