Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: is there an easy way to dumb down this regular expression for me?

by ioannis (Abbot)
on Oct 20, 2005 at 03:15 UTC ( #501522=note: print w/replies, xml ) Need Help??


in reply to is there an easy way to dumb down this regular expression for me?

Sometimes, it is more prudent to declare a pattern with our .

Thanks to GrandFather who styled and commented the whole mess. The pattern now takes a huge space on my screen and the Perl code is mixed with typical ugly regexes. So, how do I reuse the pattern in another module; simple you say, declare it with our so the pattern is accessable from everywhere. Could we do better and avoid the our declaration? Yes, you say, declare a function that returns the regex, and all we have to do later is check for match using $_ =~ cos_pattern() . Lets declare the function:

 sub cos_pattern { $re }

You see the problem? We have inadvertently created a closure.

And how do we solve this problem: back declaring with our again:

our $re = qr / ....big... ...multiline... ...pattern... /x;

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (3)
As of 2022-11-30 20:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?