[perl] 특정단어부터 특정단어까지 추출

xseeker82의 이미지

안녕하세요 검색을 통해 도움받는 사람입니다.

perl 을 가끔 사용하는데요.
질문이 있어서 글올립니다.

wer..
...
rew

위 단어들이 반복되는 텍스트 파일이 있고
wer 부터 rew 까지만 반복해서 추출하고 싶습니다.

grep 으로 단어 찾아서 라인수를 얻어오고
루프를 돌려 그 사이 라인을 저장하면 될 것 같긴 한데,,,
잘 안되네요 ㅜㅜ

모듈을 사용하지 않고 가능할까요?

답 주신 분께 미리 감사드립니다.

익명 사용자의 이미지

perl -ne 'print if (/^wer/../^rew/)'

익명 사용자의 이미지

awk '/^wer/,/^rew/'

xseeker82의 이미지

감사합니다.
기본이 안되어있었네요 제가 ㅜㅜ

perl -ne 'print if (/wer/../rew/)' file

awk '/wer/,/rew/' file

로 원하는 결과를 얻었습니다
다시한번 감사합니다^^