Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^3: bareword error

by johngg (Canon)
on Mar 14, 2008 at 11:16 UTC ( [id://674177]=note: print w/replies, xml ) Need Help??


in reply to Re^2: bareword error
in thread bareword error

Cripes, I'd never realised that, thanks for pointing it out. I had to write a little piece of code to prove it to myself.

$ perl -le '
> $s1 = q{catDOGfish};
> $s2 = q{xxYYYzz};
> print $1 if $s1 =~ m{([A-Z]+)};
> print $1 if $s1 =~ m{([0-9]+)};
> print $1 if $s2 =~ m{};'
DOG
YYY
$

[download]

Fancy not knowing that after all this time!

Thanks again,

JohnGG

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://674177]
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: (3)
As of 2024-04-25 17:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found