日: 2008年3月21日

コマンドライン引数は Sys.argv に配列として格納される。インデックス0がプログラム名で，以下引数の数だけ続く。

インデックス0を出力する例：

let () = print_endline Sys.argv.(0)

^o^ >ocamlc -o argv.exe argv.ml
^o^ >argv
argv

インデックス1を出力する例：

let () = print_endline Sys.argv.(1)

^o^ >ocamlc -o argv.exe argv.ml
^o^ >argv foo
foo

引数を与えないとエラーになる。

^o^ >argv
Fatal error: exception Invalid_argument("index out of bounds")

Array.iter は配列に対して ‘a -> unit 型の関数を順に適用する関数。List.iter の配列版。これを使えばコマンドライン引数の数だけ繰り返せる。

let () = Array.iter (fun s -> print_endline s) Sys.argv

^o^ >argv2 foo bar buz
argv2
foo
bar
buz