这个怎样用正则表达式简化表达？

dl0622

UID: 38417
帖子: 194
积分: 446
在线时间: 2 天 3 小时

1^# dl0622 发表于 2008-10-21 14:41

这个怎样用正则表达式简化表达？

一组数字串，如果是11或12或13开头并且长度是8，或011或012或013开头并且长度是9，那么打印1，否则打印2，类似以下：
if(($t=~/^11/…… && length $t== ||($t=~/^011/…… && length $t==9) ;
{print "1" ;}
else
{print "2";}

一定要准确的哦

hfahe

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

2^# hfahe 发表于 2008-10-21 14:50

just like ^(0|)1(1|2|3).{6}$

ynchnluiti

UID: 39553
帖子: 24
积分: 55
在线时间: 10 分钟

3^# ynchnluiti 发表于 2008-10-21 15:28

^0?1(1|2|3)\d{6}$

__lxmxn__

UID: 3845
帖子: 167
积分: 384
在线时间: 1 天 14 小时

4^# __lxmxn__ 发表于 2008-10-21 23:38

^0?1[1-3]\d{6}$

dl0622

UID: 38417
帖子: 194
积分: 446
在线时间: 2 天 3 小时

5^# dl0622 发表于 2008-10-22 11:38

都很好用，谢谢！