현재 위치

홈 ›› Forums ›› 공부 ›› 설치 및 활용 QnA

vim또는 sed 치환

DwYoon의 이미지
글쓴이: DwYoon / 작성시간: 목, 2005/12/01 - 7:17오후 

aaa { bbb; ccc; ddd; eee;}

를

aaa->bbb;
aaa->ccc;
aaa->ddd;
aaa->eee;

로 치환하고 싶습니다. 중괄호 안에 낱말 갯수는 달라질 수 있고요.

어떤 식으로 치환하면 될까요?

Forums: 
설치 및 활용 QnA
cinsk의 이미지

글쓴이: cinsk / 작성시간: 목, 2005/12/01 - 8:33오후

잠깐 동안 생각해 봤는데, 단순한 regular expression 치환으론 힘들 것 같습니다.

적어도 awk, perl등을 써야 가능할 것 같은데.. 요청하신 vim, sed는 제가 서툴기 때문에, Emacs에서는 아래 코드를 $HOME/.emacs와 같은 곳에 넣어두고, 해당하는 패턴이 있는 줄에서 M-x my-substitute<RET>를 실행하면 됩니다.

(defun my-substitute (point)
  (interactive "d")
  (let (src dst begin end pos)
    (save-excursion 
      (beginning-of-line)
      (and (re-search-forward
            "^\\([a-z]+\\)\\([ \\t]*{[ \\t]*\\)\\([a-z]+[ \\t]*;[ \\t]*\\)* }"
            nil t)
           (setq src (buffer-substring-no-properties
                      (match-beginning 1) (match-end 1))
                 pos (match-end 2)
                 begin (match-beginning 0)
                 end (match-end 0)))

      (and src
           (progn
             (goto-char pos)
             (while (re-search-forward "\\([a-z]+\\)[ \\t]*;[ \\t]*" nil t)
               (setq dst (append dst
                                 (cons (match-string-no-properties 1) nil))))

             (and dst
                  (progn (delete-region begin end)
                         (mapcar (lambda (dst)
                                   (insert (format "%s->%s\n" src dst))) dst)
                         (delete-char 1)
                         (setq pos (point)))))))
    (and dst
         (progn (push-mark begin)
                (goto-char pos)))))

C FAQ: http://www.eskimo.com/~scs/C-faq/top.html
Korean Ver: http://cinsk.github.io/cfaqs/

Fe.head의 이미지

글쓴이: Fe.head / 작성시간: 금, 2005/12/02 - 12:05오전 

#!/bin/bash

file=$1
array_str=('bbb' 'ccc' 'ddd')
array_len=3
i=0
for str in $(cat "$file"); do
  echo "$str" | sed "s/aaa/${array_str[$i]}/"
  if [ ! -z "$(echo "$str" |grep aaa)" ]; then
      i=$((i+1))
      if [ $i -eq $array_len ]; then
          i=0;
      fi
  fi
done

Quote:

[fehead@linuxstudy ~]
$ cat aa.txt
aaa
baa
aaa
zzz
aaa
aaa
aaa
aaa
aaa
[fehead@linuxstudy ~]
$ ./aa.sh aa.txt
bbb
baa
ccc
zzz
ddd
bbb
ccc
ddd
bbb
[fehead@linuxstudy ~]

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

둘러보기