Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^3: Grouped characters inside character class.

by Enlil (Parson)
on Jun 02, 2006 at 02:13 UTC ( [id://553205]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Grouped characters inside character class.
in thread Grouped characters inside character class.

The only issue with this regex (and the poster's original idea as well) is it will not properly capture the username if it contains ' on '

Noted. So we capture up until the last ' on '. 

use strict;
use warnings;
my $source = 'Posted by getting on my nerves on September 04, 2003';

if ( $source =~ /^Posted by (.*?) on (?!.* on )/i ) {
  print qq("$1") . "\n";
}

[download]

blokhead is right.. and I will go lick my wounds now.

Replies are listed 'Best First'.
Re^4: Grouped characters inside character class.
by blokhead (Monsignor) on Jun 02, 2006 at 02:56 UTC
    That's the same as just being greedy: 
    /^Posted by (.*) on /i

    [download]

    blokhead

[reply]
[d/l]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://553205]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2024-04-25 13:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found