연관 배열의 perl 속성에 액세스

Question

'type'속성 값을 찾기 위해 전체 객체를 반복하지 않고 더 쉬운 방법이 있습니까?

[ 
    { type => "voipPassword", vals => ["data"] }, 
    { type => "sn", vals => ["data"] }, 
    { type => "voipExtension", vals => [data] }, 
    { type => "cn", vals => ["data"] }, 
    { type => "telephoneNumber", vals => [data] }, 
    { type => "objectClass", vals => ["data"] }, 
    { type => "phoneMAC", vals => ["data"] }, 
] 

Answer 1

직접이 예처럼 type에 액세스 할 수 있습니다

이

#!/usr/bin/perl 
use strict; 
use warnings;  

my $ref = [ 
      { type => "voipPassword", vals => ["data"] }, 
      { type => "sn", vals => ["data"] }, 
      { type => "voipExtension", vals => ["data"] }, 
      { type => "cn", vals => ["data"] }, 
      { type => "telephoneNumber", vals => ["data"] }, 
      { type => "objectClass", vals => ["data"] }, 
      { type => "phoneMAC", vals => ["data"] }, 
      ]; 

print $ref->[0]->{'type'} . "\n"; 
print $ref->[1]{'type'} . "\n"; 

출력 :

voipPassword 
sn 

은 자세한 내용은 perlreftut를 참조하십시오.