&lt;新手上路&gt;急问：变量申明所遇问题

bolod

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

1^# bolod 发表于 2008-01-09 16:14

&lt;新手上路&gt;急问：变量申明所遇问题

请问：在做一个xml文件信息提取时，在while循环中申明变量遇到了问题,下面是简单的格式

my @reg;
while(<>){
my %reg if(/.../);
push(@reg,\%reg) if(/.../);
if(/.../){
$reg{"A"}=B;
}
}
为什么数据存不进去？它说$reg[0]->{A}不存在。不知道有没有说清楚。。。
谢谢阿！纯属新手，时间有点紧。

royalzhang

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

2^# royalzhang 发表于 2008-01-09 17:32

同一个条件为什么要判断n次呢
my @reg;
while( <> ) {
if(/.../) {
my %reg;
push(@reg,\%reg);
$reg{"A"}='B';
}
}
不明白你的问题，为什么不把出错的原始信息贴上来？

perljoker

UID: 30669
帖子: 88
积分: 202
在线时间: 10 小时

3^# perljoker 发表于 2008-01-09 18:25

没搞懂lz要干嘛

apile

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

4^# apile 发表于 2008-01-09 22:26

QUOTE:

原帖由 bolod 于 2008-1-9 16:14 发表
请问：在做一个xml文件信息提取时，在while循环中申明变量遇到了问题,下面是简单的格式

my @reg;
while(){
my %reg if(/.../);
push(@reg,\%reg) if(/.../);
if(/.../){
$reg{"A"}=B;
}
}
为什么数 ...

红色字的地方怪怪的..my %reg不應該放在 if條件裡面...這樣子%reg應該不會被宣告成功...
弄些print 看看执行到哪边停掉了...

&amp;lt;新手上路&amp;gt;急问：变量申明所遇问题

&amp;lt;新手上路&amp;gt;急问：变量申明所遇问题

<新手上路>急问：变量申明所遇问题

<新手上路>急问：变量申明所遇问题