Simple Sand Samples

プログラミング言語サンプル集

---

TOPへ

Hello World!(各言語のTOP)

(リスト/配列)要素の位置

(リスト/配列)リストの結合

(リスト/配列)リストの差分

(リスト/配列)要素の総和

(リスト/配列)MAPで各要素を処理

(リスト/配列)リスト内包表記で各要素を処理

(リスト/配列)ZIP

(リスト/配列)UNZIP

(リスト/配列)並び替え(ソート)

(連想配列)連想配列(辞書)を使う

(テキスト)標準入力を読み込んで表示

(テキスト)ファイル読み込み

(テキスト)ファイル書き込み

(テキスト)改行コードを取り除く

(テキスト)全行左右反転

(テキスト)ファイル行数を数える

(テキスト)列挙した数の合計を求める

(テキスト)CSVファイル読み込み

(バイナリ)ファイル読み込み

(バイナリ)ファイル書き込み

(ジェネレータ)数列を生成

(ジェネレータ)数列を生成(16進)

(ジェネレータ)オール0バイナリファイル

(ジェネレータ)連続数値バイナリファイル

(ジェネレータ)ランダムバイナリファイル

(ファイル)カレントディレクトリ取得

(ファイル)ディレクトリのファイル一覧

(ファイル)ディレクトリ作成

(ESC)エスケープシーケンス

(日付時刻)今日の日付を得る

(日付時刻)現在の時刻を得る

(日付時刻)日付と時刻を得る

乱数を使う

MD5(128bit)ハッシュ値を求める

指定時間sleepさせる

(プロセス間通信)受信処理

---

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

Erlang > ランダムなバイナリファイル生成

    bin-rand.erl

1
2
3
4
5
6
7
8
9
10
main(_)->
	random:seed(now()),
	{ok,S}=file:open("hoge.bin", [write,binary]),
	file:write(S,randbin(48)).
randbin(X)->
	case X of
	0 -> [];
	_ -> [random:uniform(256)-1|randbin(X - 1)]
	end.
	

48バイトのバイナリ生成

$ escript bin-rand.erl
$ od -tx1 -An -v hoge.bin
 76 69 1f a4 c4 bb b3 3b 3e 5b 78 83 62 62 21 16
 34 1e 22 84 61 84 e0 83 af ad 35 fc 7a 27 ee 2b
 5a 96 bf 6b a9 b9 aa 3d 34 d0 1d 27 d2 65 bf a2
$

  * 確認環境 Debian Linux(Wheezy)