[perl] Perl에서 정규 표현식 사용하기

이번 글에서는 Perl에서 정규 표현식을 사용하는 방법에 대해 알아보겠습니다. 정규 표현식은 문자열에서 특정 패턴을 찾거나 변경하기 위해 매우 유용하게 활용됩니다. Perl은 이를 지원하기 위해 많은 내장 함수와 연산자들을 제공합니다.

1. 정규 표현식으로 패턴 매칭하기

Perl에서 정규 표현식을 사용하여 패턴을 찾는 방법은 간단합니다. 아래는 예시 코드입니다.

my $text = "The quick brown fox jumps over the lazy dog";
if ($text =~ /fox/) {
    print "패턴이 발견되었습니다!";
} else {
    print "해당 패턴이 존재하지 않습니다.";
}

위 예시 코드에서 /로 패턴을 감싸고 =~ 연산자로 주어진 문자열에 대해 패턴 매칭을 수행합니다.

2. 패턴 대체하기

패턴을 찾아서 다른 값으로 대체하는 것 또한 Perl에서 쉽게 수행할 수 있습니다. 아래는 대체하는 예시 코드입니다.

my $text = "The quick brown fox jumps over the lazy dog";
$text =~ s/brown/red/;
print $text;  # "The quick red fox jumps over the lazy dog"

예시 코드에서 /.../ 형식으로 패턴을 지정하고 s/.../.../로 대체를 수행합니다.

3. 정규 표현식 모듈 사용하기

정규 표현식은 Perl의 내장 기능이지만, 더 복잡한 패턴 매칭이나 고급 처리를 위해 CPAN에서 제공하는 정규 표현식 모듈을 사용할 수도 있습니다. 예를 들어, Regexp::Common은 표준적인 패턴에 대한 정의를 포함하는 매우 유용한 모듈입니다.

Perl에서 정규 표현식을 사용하는 방법에 대해 간략하게 알아보았습니다. 정규 표현식은 문자열 처리에 있어서 강력하고 유용한 도구이므로, Perl을 다룰 때 유의해두어야 합니다.

참조: Perl Regular Expression - perldoc.perl.org