엔지니어링

Perl 구조화된 문자열 정규표현식 치환

warpmemory 2017. 2. 8. 17:04

치환 전 user.txt

1
2
3
4
5
name age blood
protos 120 A
zerg 10 B
terran 33 O
nara 50 AB
cs


zerg의 blood 정보를 Z 로 치환

1
perl -pi -'s/(zerg)\s([^\s]+)\s([^\s]+)/\1 \2 Z/g' user.txt
cs

치환 후 user.txt

1
2
3
4
5
name age blood
protos 120 A
zerg 10 Z
terran 33 O
nara 50 AB
cs