Saturday, October 28, 2006
펄/Perl 정규식] 문자열 추출; Regex String Extract Example
문자열에서, 정규식에 매치되는 특정 부분만 뽑아내어 배열에 저장하는 방법입니다.
my @array = $str =~ /어떤정규식/;
이것은 $str 이라는 문자열에서, 정규식에 매치되는 부분만, @array 라는 배열에 집어 넣는 것입니다.
기본 변수인 $_ 에 문자열이 들어 있다면
my @array = /어떤정규식/;
이렇게 해도 됩니다.
단, 정규식에서 소괄호를 사용하면 Use of uninitialized value in print at D:\Z\0.pl line 13. (초기화되지 않은 값을 출력) 이런 워닝이 나올 수가 있습니다.
위의 예제는 특정 패턴의 데이터를 추출하는 것이고, 임의의 문자열을 추출하려면 여기에 있는 방법을 사용합니다: ▶▶ Perl/펄 정규식] HTML 태그 속의 텍스트, URL 링크 추출; Regex
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 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
<< Home