Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Is this a bug in Perl scope?

by trwww (Priest)
on Jul 23, 2012 at 21:29 UTC ( #983238=note: print w/replies, xml ) Need Help??

in reply to Is this a bug in Perl scope?

This behavior is documented very clearly:

perldoc -f my A "my" declares the listed variables to be local (lexically) to the enclosing block, file, or "eval".

There no such thing as a "package scope". To do what you want you'd have to use blocks:

$ perl use strict; use warnings; { package one; my $var = 1; } { package two; my $var = 5; } package main; print "$var\n"; Global symbol "$var" requires explicit package name at - line 16. Execution of - aborted due to compilation errors.

Also, FYI warnings and strict are filescoped also if they aren't in a more specific container.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (3)
As of 2016-10-23 23:13 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (302 votes). Check out past polls.