Simple
Sand
Samples
プログラミング言語サンプル集
TOPへ
Hello World!(各言語のTOP)
(文字列)一文字毎に分割する
(リスト/配列)リスト/配列
(リスト/配列)要素数
(リスト/配列)末尾に要素を追加
(リスト/配列)先頭に要素を追加
(リスト/配列)最初の要素
(リスト/配列)N番目の要素
(リスト/配列)2番目以降の要素
(リスト/配列)順序を反転
(リスト/配列)リストの結合
(リスト/配列)MAPで各要素を処理
(リスト/配列)並び替え(ソート)
(連想配列)連想配列(辞書)を使う
外部コマンドを実行する
(テキスト)標準入力を読み込んで表示
(テキスト)ファイル読み込み
(テキスト)ファイル書き込み
(テキスト)ファイルを行番号付きで表示
(テキスト)全行左右反転
(バイナリ)ファイル読み込み
(バイナリ)ファイル書き込み
(ジェネレータ)オール0バイナリファイル
(ジェネレータ)連続数値バイナリファイル
(ファイル)カレントディレクトリ取得
(ファイル)ディレクトリ存在チェック
(ファイル名)パスからディレクトリ名取得
(ファイル名)パスからファイル名取得
(ファイル名)拡張子を取り除く
(ESC)コンソール画面クリア
乱数を使う
MD5(128bit)ハッシュ値を求める

説明のないとってもシンプルなサンプルプログラム集
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

OCaml > ファイルやディレクトリの存在を調べる

    test-e.ml

1
2
3
4
5
let a = Sys.file_exists "hoge.txt";;
if a == true then
print_endline "FOUND"
else
print_endline "NOT FOUND"
$ cp test-e.ml aaa.ml
$ ocamlc aaa.ml
$ ./a.out
NOT FOUND
$ touch hoge.txt
$ ./a.out
FOUND
$

  * 確認環境 Debian Linux(Wheezy)