Perl从引用到包含引用的数组的哈希

时间:2012-01-27 18:06:26

标签: perl

我有以下代码返回对包含一个元素的数组的引用。该元素包含对哈希的引用。我想消除这种双重引用,并使用散列的副本或直接在散列本身上工作,以便我可以使用密钥。

以下是代码:

my $extracted = $db_obj->extract('source_tag', $source_tag);

所以$ extract包含对数组的引用。该数组有一个元素,一个对哈希的引用。当我使用Data :: Dumper时,哈希看起来像这样:

    $VAR1 = \\[
              {
                'data_center' => 'qe76',
                'description' => 'locator',
                'abs_delta_dollar_percent' => undef,
                'content_type' => 'Raw',
                'source_tag' => 'hg9efx4',
                'producer' => 'partner',
                'id' => '15282',
                'storage_type' => 'box',
                'storage_path' => '/mnt/storage/2012'
              }
            ];

我希望能够直接访问哈希,以便我可以使用键来获取值。如何删除此双引用?

3 个答案:

答案 0 :(得分:1)

my $extracted = $db_obj->extract('source_tag', $source_tag) -> [0];

答案 1 :(得分:1)

my %hash = %{ $db_obj->extract('source_tag', $source_tag)->[0] } ;

答案 2 :(得分:0)

这似乎是:

$$$$result[0] 
or 
$$$result[0] 

如果你不是指双重反斜杠。