[완료]vim나 perl로 문서 편집하는 것 좀 도와주세요

novice의 이미지

스크립트 파일에서 주석만 발췌하려고 합니다.

주석은 '로 시작하고, 변환 중에 이상이 있는지 가끔 행 마지막에 @가 붙어 있어서 이것도 삭제하려고 합니다.

정리하자면

1. '로 시작하는 행을 제외한 행 삭제
2. 행 마지막에 @가 붙어 있으면 마지막 한 글자(@) 삭제
3. 행 처음에 '가 있으면 처음 한 글자(') 삭제

이렇게 하려고 합니다.

vim 명령행이나 perl스크립트를 잘 아시는 분이 계시면 좀 도와주세요 ㅜㅜ

aero의 이미지

.
.
.
.
.
test.txt

'hello
hi
how are you?
'hi@

perl oneliner

perl -ne 'print if s/^\x27(.*?)@?$/$1/' test.txt

결과

hello
hi
Fe.head의 이미지

vim 기준

1. '로 시작하는 행을 제외한 행 삭제
%g!/^'/d

2. 행 마지막에 @가 붙어 있으면 마지막 한 글자(@) 삭제
%s/@$//

3. 행 처음에 '가 있으면 처음 한 글자(') 삭제
%s/^'//

-----------------------
과거를 알고 싶거든 오늘의 네 모습을 보아라. 그것이 과거의 너니라.
그리고 내일을 알고 싶으냐?
그러면 오늘의 너를 보아라. 그것이 바로 미래의 너니라.

고작 블로킹 하나, 고작 25점 중에 1점, 고작 부활동
"만약 그 순간이 온다면 그때가 네가 배구에 빠지는 순간이야"

novice의 이미지

aero님, Fe.head님, 답변해주셔서 감사합니다.
덕분에 무사히 해결했습니다. 좋은 하루 보내세요^^/

I don't belong here..