如何在Perl中打印哈希结构？

发布时间：2020-12-15 23:30:18 所属栏目：大数据来源：网络整理

导读：例子： %hash = (2010 = 21,2009= 9);$hash = { a = { 0 = {test = 1},1 = {test = 2},2 = {test = 3},3 = {test = 4},},}; 如何打印哈希？解决方法是否要打印整个哈希值或特定键值对？你期望的结果是什么？如果仅用于调试目的,您可以执行以下操作： use D

例子：

%hash = (2010 => 21,2009=> 9);

$hash = {
    a => {
        0 => {test => 1},1 => {test => 2},2 => {test => 3},3 => {test => 4},},};

如何打印哈希？

解决方法

是否要打印整个哈希值或特定键值对？你期望的结果是什么？如果仅用于调试目的,您可以执行以下操作：

use Data::Dumper;
print Dumper %hash; # or %hash to encapsulate it as a single hashref entity;

如果您不关心订购,可以使用每个功能：

while ( my($key,$value) = each %hash ) {
    print "$key = $valuen";
}

或者如果要对它进行排序,请使用for / foreach构造：

for my $key ( sort keys %hash ) {
    print "$key = $hash{$key}n";
}

或者,如果您只想要某些值,则可以使用哈希切片,例如：

print "@hash{qw{2009 2010}}n";

总是有不止一种方法可以做到这一点,虽然它有助于知道你要先做什么油炸:)

（编辑：李大同）

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