Re^3: Regex, extracting stuff from the middle of a line

[perlNinny]

Messed up my question on the regex thing. Here is some example lines:

Created by a.buncha.stuff.I.dont.want\GeorgeO at the parker inn
date : 06-Aug-06:22.34.01 buncahstuffIdon'twant
Created by a.buncha.stuff.I.dont.want\7of9 at the parker inn
date : 06-Jan-06:22.34.01 buncahstuffIdon'twant

Please get me:
GeorgeO
06-Aug-06:22.34.01
7of9
06-Jan-06:22.34.01

2006-08-03 Moved and retitled by GrandFather, as per Monastery guidelines
Original title: 'Regex, extracting stuff from the middle of a line'

[ikegami]

Your requirements are very vague.

• You didn't specify which components are constant and which are not. I assumed "\" and "date : " are constant.
• You didn't specify of which chars the variable parts could be made. I assumed what is represented by "GeorgeO" could contain spaces (which required specifying " at the parker inn"),
• You didn't specufy from where the lines came. I assumed a file handle.
• You didn't specify what to do with the extracted values. I print them.

while (<$fh>) {
   print("$1\n") if /\\(.*?) at the parker inn$/
                 or /^date : (\S+)/;
}

[Fletch]

And your code that's not working looks like . . .?

Show some effort of your own before submitting work requests. See How (Not) To Ask A Question.

Update: Oop, didn't realize this was a followup to a prior question.

Probably because it was exceedingly vague and offered no context or indication otherwise, so the how-not-to-ask-ing's still relevant.

[sh1tn]

You should escape the special '\' symbol:

m|\\(\w+)| and print $1, "\n";

For the date/time:

m|:\s+(\S+)| and print $1, "\n";

See perlre

[swampyankee]

While ikegami said pretty much everything I wanted to say, I suggest that if you can come up with a set of explicit rules for what you want removed or, conversely, kept, the code will be easy (perhaps not the most elegant possible).