Simple
Sand
Samples
プログラミング言語サンプル集
TOPへ
Hello World!(各言語のTOP)
(リスト/配列)N番目の要素
(リスト/配列)2番目以降の要素
(リスト/配列)順序を反転
(リスト/配列)要素の位置
(リスト/配列)リストの結合
(リスト/配列)要素の総和
(リスト/配列)MAPで各要素を処理
(リスト/配列)リスト内包表記で各要素を処理
(リスト/配列)ZIP
(リスト/配列)UNZIP
(リスト/配列)並び替え(ソート)
(連想配列)連想配列(辞書)を使う
外部コマンドを実行する
(テキスト)標準入力を読み込んで表示
(テキスト)全行一括読み込み
(テキスト)ファイル読み込み
(テキスト)ファイル書き込み
(テキスト)改行コードを取り除く
(テキスト)全行左右反転
(テキスト)ファイル行数を数える
(バイナリ)ファイル読み込み
(バイナリ)ファイル書き込み
(ジェネレータ)数列を生成
(ジェネレータ)オール0バイナリファイル
(ジェネレータ)連続数値バイナリファイル
(ファイル)カレントディレクトリ取得
(ファイル)ディレクトリのファイル一覧
(ファイル)ディレクトリ作成
(ファイル名)パスからディレクトリ名取得
(ファイル名)パスからファイル名取得
(ファイル名)拡張子を取り除く
(ESC)コンソール画面クリア
乱数を使う

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

Haskell > 連続する数値のバイナリファイル生成

    bin-seq.hs

1
2
3
4
5
6
7
8
9
import System.Environment
import Control.Monad.Fix
import Data.ByteString.Lazy as B
import Data.List as L
main = do args <- getArgs
       let filename = args !! 0
       len = read (args !! 1)
       src = [0,1 .. (len-1)]
       B.writeFile filename (pack src)

80バイトのバイナリ生成

$ runghc bin-seq.hs hoge.bin 80
$ 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
 30 31 32 33 34 35 36 37 38 39 3a 3b 3c 3d 3e 3f
 40 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f
$