基于我目前对Perl中哈希的理解,我希望这段代码可以打印出“hello world”.它没有打印任何东西.
%a=();
%b=();
$b{str} = "hello";
$a{1}=%b;
$b=();
$b{str} = "world";
$a{2}=%b;
print "$a{1}{str} $a{2}{str}";
我假设散列就像一个数组,为什么我不能让散列包含另一个？
解决方法
>你应该总是使用“use strict;”在你的程序中.
>使用引用和匿名哈希.
>使用引用和匿名哈希.
use strict;use warnings;
my %a;
my %b;
$b{str} = "hello";
$a{1}={%b};
%b=();
$b{str} = "world";
$a{2}={%b};
print "$a{1}{str} $a{2}{str}";
{％b}创建对哈希％b副本的引用.你需要在这里复制,因为你以后将其清空.