develooper Front page | perl.perl5.porters | Postings from July 2012

Re: Objects without stashes?

Thread Previous | Thread Next
From:
Jesse Luehrs
Date:
July 29, 2012 19:21
Subject:
Re: Objects without stashes?
Message ID:
20120730022110.GZ30375@tozt.net
On Sun, Jul 29, 2012 at 06:58:08PM -0700, Rev. Chip wrote:
> On Sun, Jul 29, 2012 at 07:00:10PM -0500, Jesse Luehrs wrote:
> > On Sun, Jul 29, 2012 at 04:44:14PM -0700, Rev. Chip wrote:
> > > On Sun, Jul 29, 2012 at 01:40:16PM -0700, Father Chrysostomos wrote:
> > > > Rev. Chip said:
> > > > > I didn't use the term "stash" or "glob", and that was on purpose.  I would
> > > > > like to see this work, where the RHS of bless is a simple hash that stays
> > > > > simple:
> > > > > 
> > > > >     bless [0], { inc => sub { ++$_[0][0] },
> > > > >                  dec => sub { --$_[0][0] },
> > > > > 		 DESTROY => sub { print "BYE\n" } };
> > > > 
> > > >     bless [0], package { sub inc { ++$_[0][0] },
> > > >                          sub dec { --$_[0][0] },
> > > >                          DESTROY { print "BYE\n" } };
> > > 
> > > Sweet.  How would one go about inspecting this stash, given $obj = <that expression>?
> > 
> > The same way you'd inspect any other stash, I'd imagine.
> 
> You'd have to get access to it.  The return value of blessed() is a name.  So how?

I'd imagine that if we were to change the language to allow stashes
without names that were referred to by their underlying hash, that we
would also change blessed to return a hashref in that case, or something
along those lines.

-doy

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About