Perl의리스트를 통해 반복하기.

Question

나는 Perl을 배우기 시작했다. 그리고 이것은 이상한 결과물을 얻고 이것에 대한 약간의 명확성을 기대하고있는 루프를위한 기본적인 것이다.

@numbers = {1,4,5,6,7,8,9}; 
for(my$i = 0; $i<=$#numbers; $i++) 
{ 
    print ("$numbers[$i}\n"); 
} 

출력이 HASH (0x23a09c)입니다.

실제로 이것이 의미하는 바는 무엇이며이 결과가 나타나는 이유는 무엇입니까?

관련 아리안

Answer 1

당신이 원하는 : {1,4,5,6,7,8,9}와

@numbers = (1,4,5,6,7,8,9); 
foreach my $number (@numbers) 
{ 
    print ("$number\n"); 
} 

당신은 실제로 키 값 쌍 (1 => 4, 5 => 6, 7 => 8, 9 => undef)을 포함하는 익명의 해쉬에 대한 참조를 만드는 것입니다. @numbers = {1,4,5,6,7,8,9};을 쓸 때 참조가 @numbers 배열에 저장된 유일한 스칼라가됩니다.

또한 요소를 반복하고 싶다면 카운터가있는 "클래식"스타일을 사용할 필요가 없습니다.

당신은 할 수 있습니다 :

for my $number (1 .. 9) { 
    print "$number\n"; 
} 

당신은 당신이 쓰는 모든 Perl 스크립트의 시작 부분에 use strict; 및 use warnings;이 있는지 확인합니다. 이러한 지시문을 사용하면 perl에서 오류를 포착하고 오류 코드가 있음을 경고 할 수 있습니다. 초보자 인 경우 자세한 정보를 얻으려면 warnings 인 사람들과 diagnostics을 연결해야 할 수 있습니다.

이것은 매우 편리합니다. 특히 Perl로 시작할 때 특히 발에서 자신을 방지하는 데 도움이되므로 편리합니다.

Answer 2

시도 :

당신이 거기에 인덱스 0 해시 ​​심판 배열을 만드는 무슨 일을하는지

@numbers = (1,4,5,6,7,8,9); 
foreach(@numbers) { 
    print $_; 
} 

Answer 3

, 즉 : 당신이 엄격한 사용했다면

$numbers[0] = { 
    1 => 4, 
    5 => 6, 
    7 => 8, 
    9 => undef, 
}; 

당신이 볼 것입니다 :

Global symbol "@numbers" requires explicit package name 

및 경고 말했을 것이다 :

같은 뭔가

Odd number of elements in anonymous hash 

시작 모든 펄 스크립트 :

#!/usr/bin/perl -w 
use strict; 

(또는 use warnings;)와 항상 바로 이러한 종류의 오류를 잡을 수 있습니다. 숙련 된 펄 프로그래머조차도 때때로 수작업으로 만듭니다. 골프를 치지 않는 한, 그들을 내버려 두지 않는 이유가 절대 없습니다.