Your skill will accomplish what the force of many cannot |
|
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
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:
In reply to Re: is there an easy way to dumb down this regular expression for me?
by ioannis
|
|