2008-06-15
■[Perl]併用
『初めてのPerl』は字が多いので、全体像をざっくり理解するためにはこちらの本を併用。
- 作者: 株式会社アンク
- 出版社/メーカー: 翔泳社
- 発売日: 2005/07/14
- メディア: 大型本
- 購入: 3人 クリック: 55回
- この商品を含むブログ (10件) を見る
■[Perl]ディレクトリを階層化して作る
お休みだからって休んでたわけじゃないよ・・
試行錯誤していたんだ。(でも今日はお昼からワインと日本酒いただきました。)
(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 "もうあるぞーい";
}
動いたぞーい!
