http://www.perlmonks.org?node_id=997735


in reply to Re^3: How do you find keys of a Blessed Hash?
in thread How do you find keys of a Blessed Hash?

It's sad that these new features we're getting never work as well as intended (given's lexical $_, the mess of smartmatch, auto-dereferencing with keys and others, treating arrays like hashes).
  • Comment on 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'
Re^5: How do you find keys of a Blessed Hash?
by moritz (Cardinal) on Oct 08, 2012 at 05:44 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).