Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: New to perl and regex

by Athanasius (Chancellor)
on Nov 19, 2012 at 02:15 UTC ( #1004468=note: print w/replies, xml ) Need Help??

in reply to New to perl and regex

if($line =~ /\s*([a-zA-Z]+\s*)+\s*(-?\d\d?)\s*/) ^

The problem description specifies “at least 1 or more white space” between the last word and the integer, but the regex has \s* (which is zero or more). This should be \s+ (one or more).

Apart from that, it’s difficult to offer advice without more information. Specifically, how is the code failing?

As Kenosis says, please provide some sample data (along with the desired output).

Athanasius <°(((><contra mundum

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1004468]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2016-10-27 04:39 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (353 votes). Check out past polls.