이 블로그 검색

2022년 10월 19일 수요일

perl 사용법. (

 perl -lane    "/^Time/ and print $F[2] 


l은 맨 끝이 개행으로 끝나게 해서 실행 이후도 터미널이 깔끔하게 하는것.

a는 자동으로 chopt를 수행해 라인 검색하면 자동으로 $F[0..n]으로 담김. awk의 대안 사용



 cat text   |perl -ne 's/Time/Melong/g'  

text의 Time 을 Melong으로 변환 줄의 끝까지 여러번 수행 (g)

perl -i.bak -ne 's/Time/Melong/g' file           sed -i 와 같은 방식 내용을 바꿈.


full line strings --> $_

current loop number -->>>> $.


이것 들을 이용하여, 출력도 가능.


startline=1

endline=2


'while(<>) {

    /^Time/ and startline=$.

    /^Loop/ and endline=$.

}    

seek(<STDIN>, 0,0);

while( $.>startline and $.<endline) {

print $_;

};

'

댓글 없음:

댓글 쓰기

가장 많이 본 글