perlでdir作成

2009年最初のメール投稿で画像展開に失敗。

原因は"images"配下に"2009"のフォルダが無い事だとすぐわかったが、突き詰めると手作業で事前に作っておいた後向きの対処がそもそもの敗因だ。

メール投稿処理perlスクリプトに

unless (-d $dir){
mkdir $dir or die "cannot create $dir: $!";
}

な処理を入れ、前向きに対処。