[완료]unix 문자열 합치기 질문입니다.
글쓴이: qkrskek / 작성시간: 금, 2009/09/04 - 12:21오전
unix 문자열 합치기 질문입니다.
A.txt 파일이
ab...c
------
AAA
de...f
gh...i
------
AAA1
jk...l
mn...o
pq...r
------
AAA2
이런 식으로 되어 있습니다.
이걸 요렇게 바꾸고 싶습니다.
ab...c AAA
de...f
gh...i AAA1
jk...l
mn...o
pq...r AAA2
요새 공부하고 있는 awk 와 sed 로 어떻게 해볼려고 했는데 잘 안되네요.
awk 와 sed 는 라인 처리 방식이라 그런가요? perl 을 배워야 할까요?
vim 의 Shift + j 로도 되는데, 처리 할 라인이 너무 많아서 힘드네요~!
고수님들의 좋은 답변 기다리겠습니다.
Forums:
Perl로 하면
shell, sed , awk 짬뽕 노가다 할 바에야 Perl로
1번째 일반 프로그램 버젼
A.pl
#!/usr/bin/env perl use strict; use warnings; my $text = do { local $/; <> }; $text =~ s/^([^\-\s].*?)\n(\-+)\n([^\-\s].*?)$/$1 $3/msg; print $text;결과
.
.
.
위 스크립트를 Perl one liner로 줄인 버젼
결과
패턴이 저렇게 정형적이다면 더 간단하게~
다시 생각해보니
패턴이 저렇게 정형적이다면 복잡한 정규식도 필요없이 이렇게도 가능하겠네요.
awk로 하면 awk '{
awk로 하면
awk '{ if ($0 ~ /^-+$/) { getline x; printf " %s\n", x; nobar=0; } else { if (nobar) printf "\n"; printf "%s", $0; nobar=1; } }' A.txt혹은
awk 'BEGIN { RS="\n-+\n"; ORS=" " } { print $0; }' A.txtsed로 하면
sed -nr 'h :again n /^-+$/ { g N s/\n/ / p b skip } x p b again :skip ' A.txt[bushi@rose net]$ sed -e :a
OTL
vim A.txt
vim A.txt
===========================================================================
Shocky Han
BIM Consultant, Certified Information Systems Auditor
Seoul, Korea.
===========================================================================
sed로 하면
/^[^ ][^ ]*/{ N /--*/!{ P D } N s/\n.*\n/ / }많은 댓글 감사합니다.
요새 개인적인 일 때문에 KLDP에 못 들어왔었는데
그새 많은 해결책들을 올려주셨네요!
감사합니다!내일 회사 얼른가서 해 봐야겠네요~!