初学perl 被一简单的程序困惑

308happy

UID: 38673
帖子: 66
积分: 151
在线时间: 6 小时

11^# 308happy 发表于 2008-07-31 12:29

to guijia8427：好像换成my $what = ‘fred|barney’不行啊， $str="fredfredfreddkkd"赋值是什么意思呢？

请教net_robber
(A|B){1,3} 没太看明白可否告知细节？

谢谢

guijia8427

UID: 8237
帖子: 160
积分: 368
在线时间: 1 天 11 小时

12^# guijia8427 发表于 2008-07-31 13:08

QUOTE:

原帖由 308happy 于 2008-7-31 12:29 发表
to guijia8427：好像换成my $what = ‘fred|barney’不行啊， $str="fredfredfreddkkd"赋值是什么意思呢？

请教net_robber
(A|B){1,3} 没太看明白可否告知细节？

谢谢

换成 $what = ‘fred|barney’也行
$str="fredfredfreddkkd"就是你要解析的字符串啊不然这个正则拿来做什么呢

308happy

UID: 38673
帖子: 66
积分: 151
在线时间: 6 小时

13^# 308happy 发表于 2008-07-31 13:13

明白了可能我把题目理解错了谢谢哈～

hdc1112

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

14^# hdc1112 发表于 2008-07-31 13:15

其实不用括号也可以

#!perl -w

$a="fredfredfred";

$regex=eval{qr/fred/};

if($a=~m/$regex{3}/) {print "aa";}

这样就可以

所以说要把正则表达式放到变量中时，最好采用$regex=eval{qr/fred/};这种形式，能判断该正则表达式的有效性

lujx

UID: 19039
帖子: 132
积分: 303
在线时间: 1 天

15^# lujx 发表于 2008-08-02 21:15

建议买一本《正则表达式必知必会》放在案头做辅助参考。

yingweixu

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

16^# yingweixu 发表于 2008-08-04 14:21

感觉～～～
新手上路应该多看书！多理解！

不死草

UID: 35536
帖子: 142
积分: 326
在线时间: 1 天 3 小时

17^# 不死草发表于 2008-08-04 15:41

同意14楼的，呵呵。。。

churchmice

UID: 31829
帖子: 2
积分: 4
在线时间: 10 分钟

18^# churchmice 发表于 2008-08-04 15:54

他那个没有加括号
解释成hash了吧