Simple
Sand
Samples
プログラミング言語サンプル集
TOPへ
Hello World!(各言語のTOP)
(文字列)文字列を左右反転
(文字列)10進文字列->数値 変換
(文字列)16進文字列->数値 変換
(文字列)文字列の一部を取り出す
(文字列)文字列を分割する
(文字列)一文字毎に分割する
(リスト/配列)リスト/配列
(リスト/配列)要素数
(リスト/配列)末尾に要素を追加
(リスト/配列)先頭に要素を追加
(リスト/配列)最初の要素
(リスト/配列)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 > バイナリファイルを読み込む

    read-bin.ml 

1
2
3
4
5
6
7
let readbin filename =
	let f = open_in filename in
	try 
		while true do Printf.printf "%02X " (input_byte f) done
	with End_of_file -> ();
	print_endline "";;
readbin "hoge.bin";;
$ echo -ne "\x1\x2\x3" > hoge.bin
$ od -tx1 hoge.bin
0000000 01 02 03
0000003
$ cp read-bin.ml aaa.ml
$ ocamlc aaa.ml
$ ./a.out
01 02 03
$