Re: mkdir$B$N(B -p $B%*%W%7%g%sAjEv$r<B8=$9$k$K$O!)(B

Article View: fj.lang.perl

Article #170

#170

From: IRIUCHIJIMA Ken / 入内島健
Date: Thu, 02 Apr 1998 00:00

27 lines
1469 bytes

>>>>> kazuhiko.nammei@toshiba.co.jp (Kazuhiko Nanmei) (="nammei") さん
>>>>> 2 Apr 1998 10:09:48 GMT に言われるには:

 nammei> mkdirの-pオプション相当を実現したいのですが、どんなふうに
 nammei> 書けば良いんでしょうか？
...

 nammei> mkdir -p a/b/c/d

ばらして、上から順番にあるかどうか試しながら作っていけばよいですね。
区切りが '/' なので若干面倒ですが考え方だけ書くと、$_ に a/b/c/d が入っ
ているとして

	@d = split m'/';

	for (@d) {
	  mkdir $_
	    unless -d $_;
	  chdir $_;
	}

みたいなことをやれば、できるでしょう。
# このまま全く加筆なしに動くとは思わないで下さいね。
--
				東芝	入内島 健	横浜市鶴見区在住
mailto: ken.iriuchijima@toshiba.co.jp, junkto: ken@gaea.ssel.toshiba.co.jp

Technical Details

Message-ID: <38vhss3235.fsf@gaea.ssel.toshiba.co.jp>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <6fvo5c$jd9@ux37.fuchu.toshiba.co.jp>

Show Full Headers

Complete Article Headers

X-Google-Language: Japanese,JIS
X-Google-Thread: 1043e7,35a2f9c0f0c5150f
X-Google-Attributes: gid1043e7,public
From: ken@gaea.ssel.toshiba.co.jp (IRIUCHIJIMA Ken / 入内島 健)
Subject: Re: mkdir$B$N(B -p $B%*%W%7%g%sAjEv$r<B8=$9$k$K$O!)(B
Date: 1998/04/02
Message-ID: <38vhss3235.fsf@gaea.ssel.toshiba.co.jp>
X-Deja-AN: 340160152
Sender: ken@gaea.ssel.toshiba.co.jp
References: <6fvo5c$jd9@ux37.fuchu.toshiba.co.jp>
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-2022-jp
Organization: R. & D. Center, TOSHIBA Corp., JAPAN / $BEl<G(B $B8&5f3+H/%;%s%?!<(B
Newsgroups: fj.lang.perl

Reply to Parent Message

Article View: fj.lang.perl

Re: mkdir$B$N(B -p $B%*%W%7%g%sAjEv$r<B8=$9$k$K$O!)(B

Re: mkdir$B$N(B -p $B%*%W%7%g%sAjEv$r<B8=$9$k$K$O!)(B