CnUnix

[알림판목록 I] [알림판목록 II] [글목록][이 전][다 음]
[ CnUnix ] in KIDS
글 쓴 이(By): Zaharang (vision2002)
날 짜 (Date): 2002년 10월 11일 금요일 오후 01시 49분 41초
제 목(Title): Re: [Q] 이럴땐 어떻게 sed? awk?


$cat test.pl

#!/usr/local/bin/perl

while($line = <STDIN>)
{   
    chop($line);
    if ( $line =~ /^m=/ ) {
       print " ";
    } else {
       print "\n";
    }
    print $line;
}



--------


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