Saturday, October 28, 2006

펄/Perl 정규식] 문자열 추출; Regex String Extract Example

문자열에서, 정규식에 매치되는 특정 부분만 뽑아내어 배열에 저장하는 방법입니다.

my @array = $str =~ /어떤정규식/;

이것은 $str 이라는 문자열에서, 정규식에 매치되는 부분만, @array 라는 배열에 집어 넣는 것입니다.

기본 변수인 $_ 에 문자열이 들어 있다면

my @array = /어떤정규식/;

이렇게 해도 됩니다.

정규식으로 문자열 추출 예제 (숫자와 알파벳만 추출)

#!/usr/bin/perl
use strict; use warnings;

# 문자열 정의
my $str = "맹구는 35점을 받고, 철수는 Soju를 60병 마셨습니다. 동수는 456번 BUS를 타고 집에 갔습니다.";

# 문자열에서 정규식으로 특정 문자열 추출하여 배열에 넣기
my @array = $str =~ /\d+|[a-z|A-Z]+/g;

print $_, "\n" foreach(@array); # 배열 출력

# 출력 결과:
####################
# 35
# Soju
# 60
# 456
# BUS
####################

단, 정규식에서 소괄호를 사용하면 Use of uninitialized value in print at D:\Z\0.pl line 13. (초기화되지 않은 값을 출력) 이런 워닝이 나올 수가 있습니다.

위의 예제는 특정 패턴의 데이터를 추출하는 것이고, 임의의 문자열을 추출하려면 여기에 있는 방법을 사용합니다: ▶▶ Perl/펄 정규식] HTML 태그 속의 텍스트, URL 링크 추출; Regex

tag: perl

Perl | 펄

tag: regex

정규식 | 정규표현식 | Regex | Regular Expression