현재 위치

홈 ›› Forums ›› 공부 ›› 프로그래밍 QnA

[완료]펄 초보 정규표현식과 리스트.

hitman7의 이미지
글쓴이: hitman7 / 작성시간: 금, 2007/07/20 - 11:53오전

아파치 로그를 parse하기 위해서 이것저것 보던중.

my ($host,$date,$url_with_method,$status,$size,$referrer,$agent) = $line =~
m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/;

을 찾았는데요.

정규표현식이 어떻게 해서 리스트로 반환이 되는지 잘 이해가 되지 않네요.
이부분에 대해서 설명좀 부탁드릴수 있을까요?

Forums: 
프로그래밍 QnA
pjm0616의 이미지

글쓴이: pjm0616 / 작성시간: 금, 2007/07/20 - 12:26오후

m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/;
에서
괄호로 묶여져 있는 부분이 처음부터 $host, $date, $url_with_method,...가 됩니다.

hitman7의 이미지

글쓴이: hitman7 / 작성시간: 금, 2007/07/20 - 3:15오후

정규표현식에 ()가 매치한 부분을 리스트로 전달하게 되어있군요.
공부를 안한 죄입니다.

열심히 할께요.

far and hard way

gamdora의 이미지

글쓴이: gamdora / 작성시간: 금, 2007/07/20 - 4:24오후

그런데 저 식에서 연산자 우선 순위자 어떻게 되는 거지요?

aero의 이미지

글쓴이: aero / 작성시간: 금, 2007/07/20 - 5:09오후

Perl의 연산자 우선 순위에 의해서
참고: http://www.perl.com/doc/manual/html/pod/perlop.html
=~ 연산이 우선하므로

my ($host,$date,$url_with_method,$status,$size,$referrer,$agent) = $line =~ m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/;

는
my ($host,$date,$url_with_method,$status,$size,$referrer,$agent) = ( $line =~ m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/ );

과 같은 의미입니다.
하지만 언어의 연산자 우선순위에 맡기지 말고 보는 사람에 혼돈의 소지가 있을 수 있는 경우 괄호로 명시적으로 묶어 주는게 좋습니다.
$var =~ m/regex/; 형식의 연산은 정규표현식에 의해 매칭되는 문자열이 있을경우 1(true)을 리턴하고 regex에 ()를 써서 grouping하는 경우 매칭된 group들의 list를 반환 합니다.
#!/usr/bin/perl
use warnings;
use strict;
use Data::Dump qw/dump/;
 
my $line = "aa bb cc dd";
dump( $line =~ m/aa/ );
dump( $line =~ m/(aa).*?(bb).*?(cc).*?(dd)/ );

결과
1
("aa", "bb", "cc", "dd")

하지만 이것도 혼돈의 소지가 남아 있으므로

$line =~ m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/;
my ($host,$date,$url_with_method,$status,$size,$referrer,$agent) = ($1, $2, $3, $4, $5, $6, $7);

처럼 해주는게 좋다고 봅니다.
pjm0616의 이미지

글쓴이: pjm0616 / 작성시간: 금, 2007/07/20 - 4:46오후

$line의 값은 변하지 않고 $line에서 m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/ 의 괄호 안에 해당하는 부분이 배열로 넘어갑니다.

우선 순위는 $line =~ m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/; 이 먼저겠네요.

아래처럼 해도 됩니다.
$line =~ m/^(\S+) - - \[(\S+ \+\d{4})\] "(\S+ \S+ [^"]+)" (\d{3}) (\d+|-) "(.*?)" "([^"]+)"$/;
my ($host,$date,$url_with_method,$status,$size,$referrer,$agent) = ($1, $2, $3, $4, $5, $6, $7);

댓글 달기

텍스트 포맷에 대한 자세한 정보

Filtered HTML

  • 텍스트에 BBCode 태그를 사용할 수 있습니다. URL은 자동으로 링크 됩니다.
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param><hr>
  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.

BBCode

  • 텍스트에 BBCode 태그를 사용할 수 있습니다. URL은 자동으로 링크 됩니다.
  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param>
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.

Textile

  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • You can use Textile markup to format text.
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param><hr>

Markdown

  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • Quick Tips:
    • Two or more spaces at a line's end = Line break
    • Double returns = Paragraph
    • *Single asterisks* or _single underscores_ = Emphasis
    • **Double** or __double__ = Strong
    • This is [a link](http://the.link.example.com "The optional title text")
    For complete details on the Markdown syntax, see the Markdown documentation and Markdown Extra documentation for tables, footnotes, and more.
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param><hr>

Plain text

  • HTML 태그를 사용할 수 없습니다.
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.
  • 줄과 단락은 자동으로 분리됩니다.
댓글 첨부 파일
이 댓글에 이미지나 파일을 업로드 합니다.
파일 크기는 8 MB보다 작아야 합니다.
허용할 파일 형식: txt pdf doc xls gif jpg jpeg mp3 png rar zip.
CAPTCHA
이것은 자동으로 스팸을 올리는 것을 막기 위해서 제공됩니다.