Re^4: How do you find keys of a Blessed Hash?

Replies are listed 'Best First'.
Re^5: How do you find keys of a Blessed Hash? by tobyink (Canon) on Oct 08, 2012 at 13:06 UTC
`keys $blessed` doesn't work for a very good reason. `keys` can (in recent versions of Perl) be used with either arrays or hashes. A blessed object can (thanks to overload) be simultaneously dereferencable as a hash and and array. So for blessed objects, you need to manually dereference. `perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'`	[reply] [d/l] [select]
Re^5: How do you find keys of a Blessed Hash? by moritz (Cardinal) on Oct 08, 2012 at 05:44 UTC
To the best of my knowledge, `//`, say and state work as designed, and the design is sound. (The first two are my favorite features from 5.010). Also it makes you appreciate how hard programming language design is. Perl 6 - the future is here, just unevenly distributed	[reply] [d/l]
Re^6: How do you find keys of a Blessed Hash? by james2vegas (Chaplain) on Oct 08, 2012 at 07:16 UTC
Sure, those work fine, but aren't really new work, just syntactic sugar over `$x = defined($x) ? $x : $value`, a `local $\ = "\n"` (and print), and a function closed over a variable declared in an outer lexical scope (this is actually superior to the sugar, since you can have multiple functions sharing the same variable).	[reply] [d/l] [select]