어떻게 Perl에 참조 목록을 저장할 수 있습니까?

Question

레코드 목록을 만들고 싶습니다.

my $records = [ 
    { ID => 5342755, 
    NAME => 'Me', 
    } , 
]; 

내가 다른 레코드를 추가하려고, 다른 기록이 사라 : 나는 잘 하나 개의 레코드를 추가 할 수 있습니다

문제 란

$records = [ { 
    ID => 1212121, 
} ]; 

와 어떻게이 문제를 해결할 수 있습니까?

Answer 1

$record의 값을 덮어 써서 배열에 하나의 값만 있도록하는 것이 문제입니다. 아마 시도 대신에 다음

당신은 당신의 변수를 무시

my $records = [ 
    { ID => 5342755, 
    NAME => 'Me', 
    } , 
]; 

push @$records, { 
    ID => 1212121, 
}; 

Answer 2

은 ...

당신이 선언 할 때 :

my $records = [date structure here]; 

은 당신이 정말로 배열의 심판을 선언, 당신이 경우 초보자는 다음 (시도

my @records = ( 
       { 
       ID => 54321, 
       NAME => 'bar', 
       } , 
); 

push @records, {ID => 12345, NAME => 'foo'}; 
print $records[1]->{NAME}; 

'foo는'

를 인쇄 할 그)보다 직관적