Select Code to Download

  DB<80> package ABC::Foo; our $User='talexb'

  DB<81> use strict;print ${ $main::{"ABC::"}{"Foo::"}{User} }
talexb

  DB<82> use strict; no strict 'refs'; print ${ 'ABC::Foo::User' }
talexb

  DB<99> use strict;print ${ $ABC::{"Foo::"}{User} }
talexb