Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: Regex Bug?

by graff (Chancellor)
on May 26, 2002 at 05:58 UTC ( #169338=note: print w/replies, xml ) Need Help??

in reply to Regex Bug?

Well, this does seem curious:
$ perl -v This is perl, v5.6.1 built for i586-linux ... $ perl -e '$u=""; print $u,$/; $u=~s/(.*?)\?(.*?)/$1/gs; print $u,$/;'
But you said that you only wanted the first part (before the "?"), so why did you put parens around the second part? It does work as desired this way:
$ perl -e '$u=""; print $u,$/; $u=~s/(.*?)\?.*/$1/; print $u,$/;'
For that matter, whether or not you use the following part as well, why not split:
$ perl -e '$u=""; print $u,$/; ($ub,$ue)=split(/\?/,$u,2); print "$ub :: $ue",$/;' :: a=b&c=d
Still, the initial example is baffling, and I hope someone can explain why it should behave the way it did, just for our communal peace of mind. The final "gs" is of course superfluous for this example -- the behavior is the same with or without those qualifiers on the regex. (And "extra strength" is not really an appropriate reason for using them, anyway; check their descriptions in perlre to see what their proper, intended functions are.)

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://169338]
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: (3)
As of 2022-12-09 00:14 GMT
Find Nodes?
    Voting Booth?

    No recent polls found