Perl : 해시 키에 값 (심지어 0)이 할당되었는지 테스트하는 방법

Question

이 값이 0 인 경우에도 특정 해시 키에 이미 값이 할당되어 있는지 테스트하는 올바른 방법이 있습니까? 나는이 같은 문으로 일하고있다 :

%hash=(); 
$hash{a}=1; 
$hash{b}=0; 
if($hash{$key}) { do something } 

하지만이 네벤 만져 된 키에 대한 동일한 결과를 제공합니다 (예 : 모두 $ 해시 {B}와 $ 해시 값 0을 할당 된 것들 {c} 'false'로 평가). 이 둘의 차이를 말하는 방법이 있습니까?

Answer 1

사용에게 defined 연산자를 뭔가가 %hash의 $key가있는 경우 확인 undef

if (defined $hash{ $key }) { 
    //do stuff 
} 

사용 exists 연산자 아닌 값을 가지고 있는지 확인하는 에 작성되었습니다

defined 검사 값 $key 있는지 확인하기 위해 사용된다 undef와 exists 이외의 경우 표시되는 것을 차이 값에도 불구 해시 키이다.

Answer 2

는 perldoc -f defined 및 perldoc -f exists를 참조하십시오

my %hash = (foo => 0, bar => undef); 

print defined $hash{foo}; # true 
print defined $hash{bar}; # false 
print exists $hash{bar}; # true 
print exists $hash{baz}; # false 

delete $hash{bar}; 
print exists $hash{bar}; # false 

Answer 3

당신은 키가 실제로 해시에 존재하는지 확인하기 위해 defined()를 사용할 수 있습니다

이

if (defined($hash{$key})) { do('something'); };