从函数打印字段

Question

Perl 代码：


sub fun {
    my $id = { name        => "123",
               full_name   => "345"
               };
    return $id;
}

my $var = fun();
print(...)

如何打印 name 和 full_name？

Answer 1

您的函数 returns 对哈希的引用。您需要dereference您感兴趣的键：

use warnings;
use strict;

sub fun {
    my $id = { name        => "123",
               full_name   => "345"
             };
    return $id;
}

my $var = fun();
print $var->{name}, "\n";
print $var->{full_name}, "\n";

从函数打印字段

Print field from function

perl