Perl foreach 제어 변수를 다시 선언 할 때 경고 메시지가 표시되지 않는 이유는 무엇입니까?

Question

다음 코드에서 $i의 재 선언에 대한 경고가 표시되지 않는 이유는 무엇입니까? 현재 범위 또는 문에서 my, our 또는 state 변수를 재 선언하는 경우

#!/usr/bin/perl 

use strict; 
use warnings; 
use Data::Dumper; 

for my $i (1..3) { 
    my $i = 'DUMMY'; 
    print Dumper $i; 
} 

Answer 1

당신은 경고를 얻을 것입니다. 첫 번째 $i은 실제로 어휘 변수가 아닙니다. 당신은 Devel::Peek을 사용하여이 증명할 수 :

는

use Devel::Peek; 

for my $i (1) { 
    Dump $i; 
} 

SV = IV(0x81178c8) at 0x8100bf8 
REFCNT = 2 
FLAGS = (IOK,READONLY,pIOK) 
IV = 1 

$i가 my로 선언 된 어휘 변수임을 나타냅니다 FLAGS에는 PADMY 플래그가 없습니다.

Answer 2

실제로 동일한 범위의 재정의에 대한 경고 만 표시됩니다. 글 :

use warnings; 
my $i; 
{ 
    my $i; 
    # do something to the inner $i 
} 
# do something to the outer $i 

은 완벽하게 유효합니다.

나는 펄 내부는 이런 식으로 처리하면 잘 모르겠지만, 당신은 때문에의,

{ 
    my $i; 
    for $i (...) { ... } 
    # the outer scope-block parens are important! 
};