Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^3: if(my) scope

by ikegami (Pope)
on Apr 16, 2009 at 15:53 UTC ( #758019=note: print w/ replies, xml ) Need Help??


in reply to Re^2: if(my) scope
in thread if(my) scope

You changed
if (my $var) { ... }
to
if (...) { my $var; ... }

use strict; use warnings; use Devel::Peek; my $ref; if ((my $fred = 42), 1) { $ref = \$fred; Dump($$ref); } Dump($$ref);
SV = IV(0x816a5cc) at 0x814f684 REFCNT = 2 FLAGS = (PADBUSY,PADMY,IOK,pIOK) IV = 42 SV = IV(0x816a5cc) at 0x814f684 REFCNT = 2 FLAGS = (PADBUSY,PADMY,IOK,pIOK) IV = 42

A scope is created for if's curlies, but only a compile-time scope is created for the condition expression.

Btw, note the proper usage of Dump.


Comment on Re^3: if(my) scope
Select or Download Code
Re^4: if(my) scope
by cdarke (Prior) on Apr 16, 2009 at 16:01 UTC
    Doh!

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (7)
As of 2014-12-22 02:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (110 votes), past polls