如何在Perl中创建哈希散列？

发布时间：2020-12-15 21:52:37 所属栏目：大数据来源：网络整理

导读：基于我目前对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}"; 我假设散列就像一个数组,为什么我不能让散列包含

基于我目前对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副本的引用.你需要在这里复制,因为你以后将其清空.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!