답변.

문제의 역사

스레드(threads)는 Perl에서 경쟁 계산 및 멀티태스킹 프로그램의 리소스와의 병렬 작업을 조직할 필요성에 대한 반응으로 등장했습니다. 표준화된 모듈 threads는 Perl 5.8 이상에서 안정적으로 포함되어 있으며, ithreads 실험에서 일반적인 threads::shared로 점진적으로 이동했습니다.

문제

첫 번째 어려움은 Perl이 Java와 같은 언어에서 구현된 것처럼 스레드를 기본적으로 지원하지 않는다는 것입니다. Perl의 스레드는 각 스레드의 스택과 데이터를 복사하여 작동하며, 이로 인해 오버헤드가 발생하고 전역 변수를 직접 사용하는 것이 불가능합니다(threads::shared를 통한 특수 바인딩 변수를 제외하고). 또한 Perl은 명시적인 동기화 없이 데이터에 동시에 쓰기 시 독립적인 스레드 작업을 보장하지 않습니다.

해결책

스레드를 구성하기 위해 threads 모듈과 스레드 간 데이터 교환을 위한 추가 모듈 threads::shared가 사용됩니다. 데이터의 동기화 및 무결성 보장은 개발자의 몫으로, 종종 잠금을 통해 이루어집니다.

코드 예:

use threads;
use threads::shared;

my $counter :shared = 0;
sub increment {
    lock($counter);
    $counter++;
}

my @threads;
for (1..10) {
    push @threads, threads->create(\&increment);
}
$_->join for @threads;

print "Counter: $counter
";

주요 특징:

스레드 간 데이터는 오직 threads::shared를 통해 교환됩니다.
각 스레드는 스택과 전역 변수를 복사하여 중복성과 불편함을 유발합니다.
스레드 간 복잡한 구조 전송 및 동기화 구현이 복잡합니다.

함정이 있는 질문.

threads::shared 없이 전역 변수를 자유롭게 사용하여 스레드 간에 변경 사항이 서로 보이게 할 수 있나요?

아니요. 전역 변수는 각 스레드에 개별적으로 복사됩니다. 교환은 오직 threads::shared 또는 다른 IPC(프로세스를 통해)만 가능합니다.

Perl 스크립트에서 fork와 스레드를 동시에 사용할 수 있나요?

fork와 스레드를 혼합하는 것은 추천되지 않으며, 이로 인해 예측할 수 없는 버그와 불안정한 동작이 발생할 수 있습니다. Perl은 이러한 기술을 동시에 사용하는 것에 대해 공식적으로 경고합니다.

표준 참조를 통해 스레드 간에 복잡한 데이터 구조를 전송할 수 있나요?

아니요. Perl은 재귀적으로 중첩된 구조를 자동으로 복사하지 않으며, 이러한 시도는 오류나 직관적이지 않은 결과를 초래합니다. 이를 위해서는 깊은 복사와 공유 리소스 사용이 필요합니다.

일반적인 오류 및 안티 패턴

공유 변수에 대한 동기화 위반
스레드에서 레이블이 없는 변수 작업 시도
fork와 스레드를 동시에 사용
잠금 필요성을 무시

실생활 예

부정적인 사례

개발자는 threads::shared 없이 여러 스레드에서 동시에 업데이트되는 배열을 통해 간단한 대기열을 작성했습니다. 데이터가 자주 손상되었고 프로그램의 작업 결과가 부정확하게 나타났습니다.

장점:

빠르게 작성됨, 최소한의 인프라

단점:

데이터 손실, 경쟁 상태, 예측할 수 없는 결과

긍정적인 사례

lock을 사용하는 threads::shared를 사용하여 전체 대기열을 공유로 선언하고 동기화가 lock을 통해 이루어졌습니다. 프로그램은 심한 부하가 걸려도 안정적으로 작동했습니다.