1

我正在编写一个脚本并尝试从存储在哈希中的数组中获取一些值。在 Google 上搜索，搜索关于 SO 的问题（还有一些标题相似但仍未解决或解决的问题与我的略有不同），并在查看了Data Structures Cookbook并尝试了所有合理的尝试之后，我来求你的帮助。

我有一个哈希，$action和一个数组，$action->{'Events'}。这是 的输出print Dumper($action->{'Events'});：

$VAR1 = [{
    'Muted'        => 'something',
    'Role'         => 'something',
    'Event'        => 'something',
    'Channel'      => 'something',
    'Talking'      => 'something',
    'UserNumber'   => 'somenumber',
    'CallerIDName' => 'somenumber',
    'Conference'   => 'somenumber',
    'MarkedUser'   => 'something',
    'ActionID'     => 'somenumber',
    'CallerIDNum'  => 'somenumber',
    'Admin'        => 'something'
}];

例如，我需要获取 的值$action->{'EVENTS'}->{'CallerIDName'}，但是这种语法和许多其他语法都行不通。我什至尝试过$action->{'EVENTS'}[6]等等$action->{'EVENTS'}->[6]。

4

3 回答 3

4

它是哈希数组，试试这个方法：

$action->{'EVENTS'}[0]->{'CallerIDName'}

有关更多详细信息，请参见perldsc。

更新的示例如：

use strict;
use warnings;
use Data::Dumper;
my $action = {};
$action->{'Events'} = [{'Muted' => 'something',
            'Role' => 'something',
            'Event' => 'something',
            'Channel' => 'something',
            'Talking' => 'something',
            'UserNumber' => 'somenumber',
            'CallerIDName' => 'somenumber',
            'Conference' => 'somenumber',
            'MarkedUser' => 'something',
            'ActionID' => 'somenumber',
            'CallerIDNum' => 'somenumber',
            'Admin' => 'something'}];
#push hash into the array of hashes
push(@{$action->{'Events'}},{'Muted' => 'something',
              'Role' => 'something1',
              'Event' => 'something1',
              'Channel' => 'something1',
              'Talking' => 'something1',
              'UserNumber' => 'somenumber1',
              'CallerIDName' => 'somenumber1',
              'Conference' => 'somenumber1',
              'MarkedUser' => 'something1',
              'ActionID' => 'somenumber1',
              'CallerIDNum' => 'somenumber1',
              'Admin' => 'something1'} );
 for(my $i=0; $i < @{$action->{'Events'}}; $i++){
    print Dumper($action->{Events}[$i]); #print entire hash in array index $i
    #print callerIDName key(any key) of each hash
    print Dumper($action->{'Events'}[$i]->{'CallerIDName'});  
 }
于 2011-03-28T09:14:21.183 回答
2

您缺少的是 $action 包含对数组的引用，因此下一部分必须取消对数组的引用。然后在其中是一个哈希，您需要取消引用该哈希。所以它应该是这样的：

$action->{'EVENTS'}[0]{'CallerIDname'}

（请注意，第一个之后的 -> 是可选的，所以这也很好：

$action->{'EVENTS'}->[0]->{'CallerIDname'}

并且做同样的事情）

于 2011-03-28T09:15:33.793 回答
1

外面的 [ ] 表示哈希在数组内。所以试试：

  $action->{Events}->[0]->{CallerIDName}

您可以省略 {Events} 和 [0] 之间的 ->，但为了清楚起见，我更喜欢它。在这里没有什么不同，但在其他地方却有。比较：

  @array = (1,2,3); 
  $arrayref = \@array; 
  print $arrayref[0];    # accesses non-existent array @arrayref

  print $arrayref->[0];  # '1'
于 2011-03-28T09:21:51.213 回答