怎样合并perl中hash结构？？谢谢

xfyang

怎样合并perl中hash结构？？谢谢
除了遍历，有没有其他简单的方法！

DQP

1. %hashb = (%hasha, %hashb);

复制代码

这样?

推荐下Hash::Merge.   更实用一些

wxlfh

1. %hash = (1=>1,2=>2);
   
2. %tmp = (a=>a,b=>b);
   
3. @hash{keys %tmp} = values %tmp;

复制代码

那个%tmp散列最好是比较小的那个，这样效率高些。

[ 本帖最后由 wxlfh 于 2009-5-13 20:13 编辑 ]

Perl_Er

Perl_Er

<<perl cookbook>>上有实例

qfmeal

原帖由 wxlfh 于 2009-5-13 20:12 发表
%hash = (1=>1,2=>2);
%tmp = (a=>a,b=>b);
@hash{keys %tmp} = values %tmp;

那个%tmp散列最好是比较小的那个，这样效率高些。

我把上面那段代码拷下来，不能执行 ……

qfmeal

Bareword "a" not allowed while "strict subs" in use at ./tttttttttt.pl line 7.
Bareword "b" not allowed while "strict subs" in use at ./tttttttttt.pl line 7.
Execution of ./tttttttttt.pl aborted due to compilation errors.

DQP

缺引号

wxlfh

=>的左边会自动加引号的，小骆驼上是这么说的。在我的Perl5.10上可以运行。

qfmeal

我的是 cygwin下的perl 5.10
不加引号，不能执行