从Perl的哈希数组中获取键

Question

我有哈希代码数组，我试图从PERL中的哈希数组打印键。以下是代码

my $list = [];

$list = [
    {
     Test => “Value”
    }
];

my ($get_list_key) = map { $_ } @$list;

print $get_list_key;

我得到的输出为：

HASH(0x10bdfd0)

我希望输出为：

$list = [
     "Test"
];

任何人都可以帮忙。

提前感谢

Answer 1

尝试一下：

use strict;
use warnings;
use Data::Dumper;

my $list = [
    {
     Test => "Value"
    }
];

my $get_list_key = [ map { keys %$_ } @$list] ;
print Dumper( $get_list_key );

输出：

$VAR1 = [
          'Test'
        ];