Simple Sand Samples |
説明のないとってもシンプルなサンプルプログラム集
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 |
Perl > ディレクトリを作成する
mkdir.pl
|
|
$ find
.
$ perl mkdir.pl
mkdir new_dir3
mkdir new_dir3/a
mkdir new_dir3/a/b
mkdir new_dir3/a/b/new_dir4
$ ls -l
total 0
drwxr-xr-x 2 user user 48 Apr 19 13:36 new_dir1
drwx------ 2 user user 48 Apr 19 13:36 new_dir2
drwx------ 3 user user 72 Apr 19 13:36 new_dir3
$find new_dir3
new_dir3
new_dir3/a
new_dir3/a/b
new_dir3/a/b/new_dir4
$
.
$ perl mkdir.pl
mkdir new_dir3
mkdir new_dir3/a
mkdir new_dir3/a/b
mkdir new_dir3/a/b/new_dir4
$ ls -l
total 0
drwxr-xr-x 2 user user 48 Apr 19 13:36 new_dir1
drwx------ 2 user user 48 Apr 19 13:36 new_dir2
drwx------ 3 user user 72 Apr 19 13:36 new_dir3
$find new_dir3
new_dir3
new_dir3/a
new_dir3/a/b
new_dir3/a/b/new_dir4
$
* 確認環境 Debian Linux(Wheezy)