如何处理2个while循环中的$1,$2的问题?

wwwsu

UID: 46612
帖子: 176
积分: 404
在线时间: 1 天 18 小时

1^# wwwsu 发表于 2006-09-23 10:30

如何处理2个while循环中的$1,$2的问题?

如何处理2个while循环中的$1,$2的问题?
1 大哥们,求教,小弟不才....
while($temp=~/\<tag:(.+?) (.+?)\>/o)
{
$comm = $1; print $comm."\n";
while( $2 =~ /(\w+)="(.*?)"/g )
{
$value{$1} = $2; print $1,$2,"\n";
}
}
第二个while里的$1,$2该怎么处理啊? 如何处理2个while循环中的$1,$2的问题?

anthony

UID: 5578
帖子: 196
积分: 450
在线时间: 2 天 4 小时

2^# anthony 发表于 2006-09-23 12:08

while($temp=~/\<tag:(.
while($temp=~/\<tag:(.+?) (.+?)\>/o)
{
$comm = $2; print $comm."\n";
while( $comm =~ /(\w+)="(.*?)"/g )
{
$value{$1} = $2; print $1,$2,"\n";
}
}

fkiori

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

3^# fkiori 发表于 2006-09-23 12:26

第二个会覆盖第一个的。第二个会覆盖第一个的。
所以一定要用临时变量