| [ CnUnix ] in KIDS 글 쓴 이(By): terzeron (microkid) 날 짜 (Date): 2002년 8월 6일 화요일 오후 05시 58분 12초 제 목(Title): Re: [Q] shell script 질문 1번 --------------------------------------------------- #!/bin/csh @ i = 1 while ($i <= 100) cp original.txt $i/copy.$i @ i++ end 2번 (더 깔끔한 방법이 있겠지만 귀찮아서... ;) --------------------------------------------------- #!/bin/csh @ i = 1 while ($i <= 100) cat original.txt | perl sub.pl $i > $i/copy.$i @ i++ end perl파일을 하나 만들어서... --- sub.pl ---------------------------------------- #!/usr/bin/perl while ($line = <STDIN>) { if ($line =~ /사과 (.*)개/) { $result = $ARGV[0] * 2 - 1; print "사과 $result개"; } } --- 어떤 성취가, 어떤 조롱이, 또는 어떤 고뇌가 나를 기다리고 있을지 나는 모른다. 나는 아무 것도 모른다. 그러나 나는 아직 과거의 경이로운 기적의 시대가 영원히 과거의 것이 되어 버리지는 않았다는 사실을 굳게 믿고 있다. - Stanislaw Lem - |