Help for this page

Select Code to Download

Select or download this

my $scalar=\"Foo";
my $REF=\$scalar;
...
print "$$scalar $scalar $$REF $$GLOB\n";
__END__
Foo SCALAR(0x1ab3108) SCALAR(0x1ab3108) *main::A