Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: strict or not strict?

by Fletch (Chancellor)
on Aug 19, 2005 at 14:03 UTC ( #485135=note: print w/replies, xml ) Need Help??


in reply to strict or not strict?

To start with my $$_ = $_; isn't even valid syntax. You're trying to declare a lexical with a dynamically generated name. Aside from the fact that the lexical would go out of scope when the block was exited (i.e. immediately in this case), it's a syntax error. A more recent perl (5.8.6) would tell you:

Can't use global $_ in "my" at spoo line 11, near "$$_ "

The real question is what do you think you're trying to accomplish with this. You have $data{blah} already, just use the hash you've got.

--
We're looking for people in ATL

Replies are listed 'Best First'.
Re^2: strict or not strict?
by Tanalis (Curate) on Aug 19, 2005 at 14:08 UTC
    *grin*

    Interestingly, in the two versions of Perl that I have access to here, 5.004_04 and 5.6.1, this snippet

    $_ = "aa"; $$_ = "bb"; print $aa;
    outputs bb.

    Notice the lack of my, and the lack of use strict; - it only works without strictness, which I guess was the point of the OP's question about turning off strict vars.

    It's not a good thing to do, admittedly - though it would seem to be valid syntax, at least historically.

    Updates to add a few words so that the post makes a little more sense.

    Update 2: Just noticed that my $$_ appears in both the OP and in Fletch's reply. Doh. Fletch is right, of course, my $$_ = $_ isn't valid syntax.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (5)
As of 2020-11-28 02:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?