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