Kazuhoさんの記事(http://gihyo.jp/dev/serial/01/perl-hackers-hub/000601)を読みながら調べたことをまとめてみる。 コード これはほとんど元記事そのまま。 use strict; use warnings; use Errno qw(:POSIX); my$dir='/tmp/kotaro/1'; unless (mkdir $dir …