Tcl
Deprecated: ord(): Providing a string that is not one byte long is deprecated. Use ord($str[0]) instead in /project/www/devpit.org/mediawiki-1.23.8/includes/cache/MessageCache.php on line 731
Deprecated: ord(): Providing a string that is not one byte long is deprecated. Use ord($str[0]) instead in /project/www/devpit.org/mediawiki-1.23.8/includes/cache/MessageCache.php on line 739
Deprecated: Creation of dynamic property PPDStack::$accum is deprecated in /project/www/devpit.org/mediawiki-1.23.8/includes/parser/Preprocessor_DOM.php on line 754
Deprecated: Constant E_STRICT is deprecated since 8.4, the error level was removed in /project/www/devpit.org/mediawiki-1.23.8/includes/GlobalFunctions.php on line 2409
From Devpit
Tcl is a string based command language that is very simple and easy to learn.
- Each line is in the form of command arg1 arg2 arg3
- " " will substitute
- { } is interpreted literally
- [ ] is interpreted as a tcl command and replaced with the output of the command (analogous to ` `)
#!/usr/local/bin/tclsh8.4
set a "Hello World!"
puts $a
if {$a == "Hell"} {
puts "1"
} else {
puts "2"
}