CnUnix

[알림판목록 I] [알림판목록 II] [글목록][이 전][다 음]
[ CnUnix ] in KIDS
글 쓴 이(By): terzeron (microkid)
날 짜 (Date): 2002년 4월 10일 수요일 오전 09시 39분 10초
제 목(Title): Re: Perl로 directory만들기?


Windows에 mkdirhier가 있을 리가 없으니(이건 X용 유틸입니다.)
mkdirhier.pl을 만드시면 되겠습니다.

$directory = "";
for $i (split /\\|\//, $ARGV[0]) {
    $i =~ s/ /\ /g;
    $directory .= "$i";
    mkdir "$directory";
    $directory .= "\\";
}

mkdirhier.pl로 저장하신 다음에 
perl mkdirhier.pl로 실행시키시든가 아니면 pl확장자에 대해서
perl을 연결프로그램으로 지정하시고 mkdirhier.pl하시면 되겠네요.

/와 \을 같이 사용할 수 있으며 공백이 들어간 디렉토리명도
가능합니다.

[알림판목록 I] [알림판목록 II] [글 목록][이 전][다 음]
키 즈 는 열 린 사 람 들 의 모 임 입 니 다.