Perl Regex Matching

Question

필자는 perl을 처음 접했고 문자열의 특정 부분과 일치하는 문제가 있습니다.

내가 일치 노력하고있어 굵게 표시되어 있습니다 :

[1339300800] 현재 호스트 상태 : 뭔가;

대괄호 사이의 문자열을 성공적으로 일치시킬 수있었습니다.

($line=~/\[(\d*)\]*/) 

나는 굵은 글씨 부분에 대한이 같은 노력하고

:

($line=~/STATE:\s(\S+);/) 

사람이 몇 가지 조언을 주실 수 있습니까?

STATE:\s([^;]*); 

Answer 1

귀하의 정규식 나를 위해 작동 않습니다. 이 1

if ($subject =~ m/STATE:\s(\S+);/) { 
    $result = $1; 
} else { 
    $result = ""; 
} 

또한 그룹에 일치하는 것을 기억, 첫 번째 정규 표현식을 만들 수 있습니다 덜 장황 조금

\[(\d*)] 

Answer 2

당신이 가까이있어 :

$line =~ /STATE:\s+([^;]+);/ 

하는 모든 것을 얻을 것이다 그것은 세미콜론이 아닙니다. 또한 여전히 주와 "뭔가"

Answer 3

문은 항상 ;로 끝나면 사이에 하나 개 이상의 공간이 있는지 일치합니다, 당신은 쓸 수 있습니다 :

$line =~ /:\s([^;]+)/