2014-03-27 231 views
0

我有這個Perl代碼,我無法弄清楚一件事。哈希訪問哈希

my %instr_enabled=(); 

foreach my $instr (@{$attrib->get_A_instructions()}) 
{ 
    %instr_enabled = (
     $instr->{instr} => { 
      enable  => $instr->{enable}, 
      group_name => $instr->{test_category}, 
     } 
    ); 
    print Dumper(\%instr_enabled); 
} 
foreach my $instr (sort keys(%instr_enabled)) 
{ 
    if($version eq "v8") 
    { 
     next unless ($instr =~ /$group_name_regex/); 
     chomp($instr); 
    } 
    else 
    { 
     print("Entering V7 test name\n"); 
     my $test_name = $instr->group_name; 
    } 
} 

如何訪問組名值是hashfor的最後一條語句的散列

回答

1
$instr_enabled{$instr}{group_name}; 

這可能不是最好的參考,但你可以在這裏找到更多的細節:http://www.cs.mcgill.ca/~abatko/computers/programming/perl/howto/hash/

+2

Perl附帶內置文檔(也有一個網頁)。試試['perldoc perlreftut'](http://perldoc.perl.org/perlreftut.html)命令。這是一個Perl參考教程。有關['perldoc perlref'](http://perldoc.perl.org/perlref.html)命令中引用的更全面的參考資料。 –

+0

感謝您備份我的答案@DavidW。! – Carlisle18