知道我这个问题答案的人一定要回答我啊,谢谢了

知道我这个问题答案的人一定要回答我啊,谢谢了
我的代码简写如下:
dbmopen(%parameter,'g:\parameter_chip_whole_data',0666)||die "Can`t open it:$!\n";
$parameter{target}[0]="abc";
print "$parameter{target}[0]=abc\n";
dbmcolse(%parameter);
dbmopen(%parameter,'g:\parameter_chip_whole_data',0666)||die "Can`t open it:$!\n";
print "$parameter{target}[0]=abc\n";
dbmcolse(%parameter);
这都不会有问题的,但是如果在上面的基础上,重写
dbmopen(%parameter,'g:\parameter_chip_whole_data',0666)||die "Can`t open it:$!\n";
print "$parameter{target}[0]=abc\n";
dbmcolse(%parameter);
到一个新文件里,运行。就没有结果了。也就是说每次要用%parameter的时候都要重新创建,直接读以前建好的文件不行。
这是为什么啊?????????
知道的人请一定回答啊。谢谢啦!!!!!