(Ovid) Re: my and local differences

[Ovid]

It looks like you are right. my does seem to be a better fit here. However, the following might be even more appropriate, given your description:

use constant EB => "\034";

That has the advantage that every knows it's a constant and not subject to change. Of course, if all you are doing is documenting, this may not be an option.

I have strict in use all the time, but I have only ever used my(), so I'm not clear on the difference.

local pushes the current copy of the variables value (if any) onto a stack and assigns a new value which is available to everything within the original scope of local. When that variable passes out of scope, the original value is pulled from the stack and restored. In practice, local is rarely needed, unless my cannot be used.

Global punctuation variables, for example, cannot be declared lexically with my and therefore must use local if you wish to constrain their scope.

open FILE, $somefile or die $!;
{
    local $/; # slurp mode
    $foo = <FILE>;
}
close FILE;

The above snippet uses "slurp mode" to read the entire contents of a file into a scalar. local is in a block to ensure that the change to $/ does not affect other portions of the program (since $/ is global).

Cheers,
Ovid

Join the Perlmonks Setiathome Group or just go the the link and check out our stats.

[HaB]

First, thanks to everyone for the comments...all of that helps.
I think the reason I've never had to use local before is that I A - rarely mess with the values to punctuation vars, and B - almost always explicitly pass a value to a subroutine that requires one, instead of relying on the global value. IOW, I use my($var) in a sub, and if I call any other routines in the sub using that var, I call them with my_sub($var);

I guess it's just weird that it has never come up before.


-HaB


hword.