问个经典问题

hdc1112

UID: 2620
帖子: 83
积分: 190
在线时间: 9 小时

1^# hdc1112 发表于 2008-07-07 18:07

问个经典问题

如何把一个文本里的a变成b，b变成a
用perl的s/pattern/replace/语句实现

ly5066113

UID: 41125
帖子: 34
积分: 78
在线时间: 1 小时

2^# ly5066113 发表于 2008-07-07 18:12

s/b/c/g
s/a/b/g
s/c/a/g

hdc1112

UID: 2620
帖子: 83
积分: 190
在线时间: 9 小时

3^# hdc1112 发表于 2008-07-07 18:14

你知道这也不是完美答案对吧？虽然我也不知道正确答案。。。

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

4^# cobrawgl 发表于 2008-07-07 18:35

tr/ab/ba/

hdc1112

UID: 2620
帖子: 83
积分: 190
在线时间: 9 小时

5^# hdc1112 发表于 2008-07-07 18:44

是对的，钻个牛角尖，怎么用s/pattern/replace/来实现tr的功能

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

6^# cobrawgl 发表于 2008-07-07 19:15

s/(a|b)/($1 eq 'a' ? 'b' : 'a')/ge;

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

7^# cobrawgl 发表于 2008-07-07 19:16

钻了半天。。。。。

hdc1112

UID: 2620
帖子: 83
积分: 190
在线时间: 9 小时

8^# hdc1112 发表于 2008-07-07 19:23

s/.../../ge里的g是全局的意思，e是什么意思哦

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

9^# cobrawgl 发表于 2008-07-07 19:28

把 replacement 作为表达式来取值

hdc1112

UID: 2620
帖子: 83
积分: 190
在线时间: 9 小时

10^# hdc1112 发表于 2008-07-07 19:33

高手。。。
我准备按lerning perl, intermediate perl, mastering perl的顺序来看，你觉得如何，我learning perl明天就可以看完啦，我感觉如果以前接触过bash，sed，awk的话，很容易看的，只是熟悉一下另外一种表达方式，learning perl这书中讲了perl几个牛逼的地方，@数组，%hash表，很好用，而且对于文件的判断不需要像在bash里那样if [ -e $filename ]这样加中括号了，狠方便哦~

我想问下你是怎么学习的，交流下