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 > 連続する数値のバイナリファイル生成

    bin-seq.ml 

1
2
3
4
5
let f = open_out "hoge.bin";;
let sta = (int_of_string Sys.argv.(1));;
let fin = (int_of_string Sys.argv.(2));;
for i=sta to fin do output_byte f i done;;
close_out f;;
$ cp bin-seq.ml aaa.ml
$ ocamlc aaa.ml
$ ./a.out 0 47
$ od -tx1 -An -v hoge.bin
 00 01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f
 10 11 12 13 14 15 16 17 18 19 1a 1b 1c 1d 1e 1f
 20 21 22 23 24 25 26 27 28 29 2a 2b 2c 2d 2e 2f
$