Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Identifying if a variable is the product of a qr//

by demerphq (Chancellor)
on Apr 25, 2002 at 10:13 UTC( #161905=note: print w/replies, xml ) Need Help??


in reply to Identifying if a variable is the product of a qr//

One thing I left out. The reason Dumper is printing out the blessed qr// as \undef is becuase it sees it as a reference to a scalar (which apparently it is, but isnt really (whee perl is fun! :-)) and tries to follow it using $$var. But $$var seems to evaluate to undef in this situation (apparently another hole in the way the regex type is handled) so Dumper ends up rendering it as a reference to a var. It is precisely this reason that I want to know how to identify these beasties. My dumper should handle this situation properly.

$ $\=$/; my $var=bless qr/[A-Z]o[A-Z]/,'foo'; print $var; print ref $var; print defined $$var ? $$var : 'undef';

Yves / DeMerphq
---
Writing a good benchmark isnt as easy as it might look.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://161905]
help
Chatterbox?
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: (4)
As of 2016-08-30 07:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The best thing I ever won in a lottery was:















    Results (411 votes). Check out past polls.