| [ CnUnix ] in KIDS 글 쓴 이(By): shanx (ratio) 날 짜 (Date): 2005년 9월 1일 목요일 오전 10시 29분 57초 제 목(Title): Re: 스크립트 질문: 특정 부분 추출 그냥 간단히 다음과 같이 해도 될 것 같네요 $text = join('', <>); while($text =~ m{(^start(.*?)^return\s+(\d+))}gms) { print "$1\n\n" if ($3 >=5); } |