Simple
Sand
Samples
プログラミング言語サンプル集
TOPへ
Hello World!(各言語のTOP)
(分岐)if文を使う
(分岐)if~elseを使う
(分岐)else ifを使う
(分岐)switch~case相当
(繰り返し)無限ループ
(繰り返し)for文を使う
(繰り返し)while文を使う
(繰り返し)foreachを使う
コマンドライン引数(その１)
コマンドライン引数(その２)
関数(メソッド)を使う
(計算)四則演算
(計算)商と余りを求める
(計算)算術まるめ四捨五入
(計算)小数点以下切り捨て
(計算)小数点以下切り上げ
(計算)べき乗を計算する
(計算)平方根
(文字列)文字列を連結する
(文字列)小文字->大文字 変換
(文字列)大文字->小文字 変換
(文字列)文字列の長さを得る
(文字列)10進文字列->数値 変換
(文字列)文字列の一部を取り出す
(文字列)文字列を分割する
(文字列)一文字毎に分割する
(文字列)分割文字列を結合する
(リスト/配列)リスト/配列
(リスト/配列)要素数
(リスト/配列)要素の総和
(リスト/配列)並び替え(ソート)
(連想配列)連想配列(辞書)を使う
外部コマンドを実行する
(テキスト)標準入力を読み込んで表示
(テキスト)ファイル読み込み
(テキスト)ファイル書き込み
(テキスト)改行コードを取り除く
(ジェネレータ)数列を生成
(ジェネレータ)数列を生成(16進)
(正規表現)正規表現を使う
(正規表現)置換する
(ファイル)カレントディレクトリ取得
(ファイル)ディレクトリ存在チェック
(ファイル)ファイル存在チェック
(ファイル)ディレクトリ作成
(ESC)コンソール画面クリア
(日付時刻)今日の日付を得る
(日付時刻)現在の時刻を得る
(日付時刻)日付と時刻を得る
(日付時刻)基準日からの連続日付
乱数を使う
(RDBMS)SQLiteへ接続する
(RDBMS)MySQLへ接続する
(Tk)Tkを使う
(Tk)Buttonを使う
(Tk)CheckButtonを使う
(Tk)Widgetに四角形を描く
(Tk)Widgetに多角形を描く
(Tk)Widgetに楕円、円を描く
(Tk)Widgetに円弧を描く
(GUI)GUIを使う
説明のないとってもシンプルなサンプルプログラム集
COBOL awk C言語 D言語 GO言語 Lua Vim
bash Perl Gauche Clojure CLISP EmacsLisp VimScript
tcsh Ruby Groovy Java C# VBScript JavaScript
Io言語 Python Erlang Scala VB.NET Excel/VBA PHP
Tcl Haskell OCaml PowerShell Windows Unix/Linux

Tcl > 文字列を分割する

    split.tcl 

1
2
3
set src "ABC DEF GHI JKL"
set dst [split $src " "]
puts [lindex $dst 1]
$ tclsh split.tcl
DEF
$

  * 確認環境 Debian Linux(Wheezy)