Question

Perl中如何改变哈希中的值？

请问如何实现在不改变键的情况下改变哈希的值呢？

Perl中的问题：
如下面这段代码：
while(($keymt,$valuemt)=each(%reverse_singleMt))
{$tempseq="";
$reverse_singleMt{$valuemt}=$tempseq;
}

好像%reverse_singleMt的值并没有改变呀。。。有没有什么办法能改变%reverse_singleMt中的值呢？

Answer 1

楼主的意思是想把整个%reverse_singleMt的值置为空，然后保留key是么，你的程序应该是$reverse_singleMt{$valuemt}=$tempseq;这个语句{}里边的值你放的是以前hash的value，改成$reverse_singleMt{$keymt}

Answer 2

就是这样用就可以。但你的引用有问题。
$reverse_singleMt{$valuemt}=$tempseq;
这句应该是
$reverse_singleMt{$keymt}=$tempseq;

Answer 3

%reverse_singleMt 需要遍历，那么其中已经有值了，键是$keymt

然后往 $reverse_singleMt{$valuemt}里面赋值，但是键用的是原来的值$valuemt

是不是应该用$reverse_singleMt{$keymt}来赋值呢

或者你再研究一下问题？