Perl Regex Matching

Question

I'm new to perl and having a problem matching a particular portion of a string.

What I'm trying to match is in bold:

[1339300800] CURRENT HOST STATE: Something;

I was successfully able to match the String between the brackets, at least!

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

I'm trying something like this for the bolded portion:

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

Could anyone give some advice?

The answers you are getting are from people who have guessed what the problem is. Your own solution will result in a regex match with $1 containing Something. What is going wrong for you? — Borodin
– Borodin, Commented Jun 15, 2012 at 20:43

buckley · Accepted Answer · 2012-06-15 20:38:49Z

2

Your regex

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

Does work for me. Remember that it is matched in group 1

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

Also, the first regex can be made a bit less verbose

\[(\d*)]

answered Jun 15, 2012 at 20:38

buckley

14.2k3 gold badges58 silver badges63 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

buckley Over a year ago

Right, then your solution where you consider ; as the delimeter is a good.

daxim · Accepted Answer · 2012-06-15 20:54:36Z

2

If the statement always ends with a ;, you can write:

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

edited Jun 15, 2012 at 20:54

daxim

39.3k4 gold badges71 silver badges135 bronze badges

answered Jun 15, 2012 at 20:39

Ander2

5,6682 gold badges25 silver badges45 bronze badges

3 Comments

jackie Over a year ago

This is what actually worked, not sure why everyone was saying that my code was fine but I still couldnt get it to work, strangely. Thanks for this solution, though!!

buckley Over a year ago

@JackieAldama Everyone was testing with "something" but once that string had a space "some thing" your regex would break

Borodin Over a year ago

In the end this has to be a Good Answer, so +1. But /:\s+([^;]+)/ is probably safer. Or even /:\s+([^;]+?)\s*;/.

Cfreak · Accepted Answer · 2012-06-15 20:39:04Z

1

You're close:

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

That will get everything that's not a semicolon. Also it will still match if there's more than one space between STATE and "something"

answered Jun 15, 2012 at 20:39

Cfreak

19.4k6 gold badges52 silver badges64 bronze badges

Collectives™ on Stack Overflow

Perl Regex Matching

3 Answers 3

1 Comment

3 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

3 Answers 3

1 Comment

3 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related