Path: utzoo!attcan!uunet!zaphod.mps.ohio-state.edu!usc!elroy.jpl.nasa.gov!jpl-devvax!lwall
From: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall)
Newsgroups: comp.lang.perl
Subject: Re: nested packages???
Message-ID: <10341@jpl-devvax.JPL.NASA.GOV>
Date: 13 Nov 90 01:42:17 GMT
References: <108383@convex.convex.com>
Reply-To: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall)
Organization: Jet Propulsion Laboratory, Pasadena, CA
Lines: 30

In article <108383@convex.convex.com> tchrist@convex.com (Tom Christiansen) writes:
: I just did this:
: 
:     $foo'bar'glarch = 1;
: 
: and 
:     print $foo'bar'glarch;
: 
: and the right thing happened!!  In the debugger,  'V foo' says:
: 
:     %_bar = (
:       glarch        'StB^S^H^PgH^A'
:     )
: 
: and "V foo'bar" says nothing at all.
: 
: On the other hand, 
:     $foo'bar'glarch = 'red';
: followed by 
:     print $foo'bar'glarch;
: still says 1.
: 
: Isn't that odd?

Not really, considering that I've never really tried to implement or test
nested packages.  There are a few hooks in there for it, but nobody's
found a good use for nested packages yet, so I haven't tried to make them
work.

Larry