Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: Unexpected qr// behavior

by Paladin (Priest)
on Apr 20, 2004 at 14:53 UTC ( #346659=note: print w/ replies, xml ) Need Help??


in reply to Unexpected qr// behavior

[~]$ perl -le '$re = qr/<!--.*?-->/; print $re;' (?-xism:<!--.*?-->)
As you can see, the qr// specificly turns off all options for the regex that you don't specify, which is why adding the /s afterwards doesn't make any difference.

As for whether this is a good thing or not, I can see arguments either way.

  • For: When you created the RE, you didn't say you wanted that option, so Perl makes sure that this particular part of the RE doesn't have that option. This is probably more usful when building a large RE up from smaller parts, and you want the different parts to act differently with regards to the various options.
  • Against: Like you saw, adding the /s didn't do what you meant. And Perl, after all, is usually very DWIMy.


Comment on Re: Unexpected qr// behavior
Select or Download Code
Re(2): Unexpected qr// behavior
by bart (Canon) on Apr 20, 2004 at 16:01 UTC
    To make things even more clear (I hope), I'll just add that you can pass modifiers to qr, just like you can for normal regexes, like this:
    $re = qr/<!--.*?-->/s; print $re;
    which prints
    (?s-xim:<!--.*?-->)
    That is: /s enabled, and /x, /i and /m disabled.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (9)
As of 2014-10-23 02:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (123 votes), past polls