正则表达式问题

me · #1

有类似如下两种格式的文本

代码：全选

1234          123456
              123456

用下面两个的正则表达式可以区别两种情况，并保存数据：

代码：全选

my $n;
my $hash;
 if(/^(\d{4})\s+(\d{6})$/){
    $n=$1;
    push @hash{$n}, $2;
}elsif(/^\s+(\d{6})$){
    push @hash{$n},$1;
}

有没有办法用一条正则表达式实现上面的功能？
谢谢帮助！

chpn · #2

/^(\d{4}){0,1}\s+(\d{6})$/

me · #3

chpn 写了：/^(\d{4}){0,1}\s+(\d{6})$/

谢谢

cheeselee · #4

这句LZ弄错了：

代码：全选

push @hash{$n}, $2;

依我理解LZ的意思，应该这样：

代码：全选

my $hash;......;push @{$hash->{$n}},$2;

或者

代码：全选

my %hash;.....;push @{$hash{$n}},$2;

要用一句正则表达式的话，可以这样：

代码：全选

/^(\d{4})?\s+(\d{6})$/