Re^2: Globs and globals

This advice is factually incorrect.

GLOB is a glob, and local doesen't help here ( besides providing false sense of security )

my $socket=\*S1;
print "Orig:",$socket,"\n";
{
local(*S1, *S2);
my $s=\*S1;
print "Local: ",$s,"\n";
}
[download]

Orig:GLOB(0x8160be4)
Local: GLOB(0x8160be4)