[perl] Perl에서 해시 다루기

Perl은 유연하고 강력한 해시(associative array)를 다루는 데 매우 효과적인 언어입니다. 해시를 사용하여 키-값 쌍을 저장하고 검색할 수 있습니다. 이번 글에서는 Perl에서 해시를 만들고 다루는 방법에 대해 알아보겠습니다.

1. 해시 만들기

해시를 만들려면 % 기호를 사용하여 다음과 같이 선언합니다.

my %hash = ( 
    key1 => "value1",
    key2 => "value2",
    key3 => "value3"
);

또는 아래와 같이 초기화할 수도 있습니다.

my %empty_hash = ();

2. 해시 값 읽기

해시의 값은 해당 키를 사용하여 읽거나 수정할 수 있습니다.

print $hash{key1};  # "value1" 출력

3. 모든 키-값 쌍에 대한 루프

foreach 문을 사용하여 모든 키-값 쌍에 대해 루프를 돌 수 있습니다.

foreach my $key (keys %hash) {
    my $value = $hash{$key};
    print "$key => $value\n";
}

4. 해시 내 특정 키 존재 여부 확인

exists 함수를 사용하여 특정 키가 해시 내에 존재하는지 확인할 수 있습니다.

if (exists $hash{key1}) {
    print "key1 exists\n";
} else {
    print "key1 does not exist\n";
}

5. 해시의 크기

scalar 함수를 사용하여 해시의 크기를 구할 수 있습니다.

my $size = scalar(keys %hash);
print "Size of hash: $size\n";

Perl에서 해시를 다루는 방법에 대한 간단한 소개였습니다. 해시는 Perl에서 매우 중요한 데이터 구조 중 하나이며, 이를 다루는 기본적인 방법을 숙지하는 것이 중요합니다.