Hatena::ブログ(Diary)

起業準備日記

2008-06-15

[]併用

『初めてのPerl』は字が多いので、全体像をざっくり理解するためにはこちらの本を併用。

Perl の絵本

Perl の絵本

[] ディレクトリを移動

お題2

f:id:tamagogayu:20080615223527j:image

うむうむ。

ちょっとHomeの場所が変?

[]ディレクトリを階層化して作る

休みだからって休んでたわけじゃないよ・・

試行錯誤していたんだ。(でも今日はお昼からワイン日本酒いただきました。)

お題いただきました。

(1) 今日の日付を調べて、HOME ディレクトリ以下に src と言うディレクトリを無ければ作って

(2) src以下に src/2008/06/12 とか言うディレクトリを無ければ作るようなプログラム

(3) ~/bin/scrach.pl として作る


最初は

mkdir src/2008/06/15

でやっていたのだけど、変なディレクトリができてうまくいかず。

色々調べた結果、

これでいいのかしら。

use File::Path;

if(!-d "src/2008/06/15"){

mkpath "src/2008/06/15";

}

else{

print "もうあるぞーい";

}

動いたぞーい!