Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: Could anyone explain the following Class::MethodMaker Code ?

by wazoox (Prior)
on Feb 20, 2006 at 11:53 UTC ( #531385=note: print w/replies, xml ) Need Help??


in reply to Could anyone explain the following Class::MethodMaker Code ?

Blech. That is really the sort of code that makes perl's bad reputation...
So what do we have ? here's my explanation : the enclosing "[]" force an anonymous array context. Inside we have 2 array elements :
scalar => [+{ -type => 'File::stat' }, qw/ name /], new => 'new',
The last one ( new => 'new') is clear enough. The first one is trickier : scalar is the hash key; let's analyse the content :
[+{ -type => 'File::stat' }, qw/ name /]
the enclosing square braces once again force an anonymous array. Inside there are two elements :
+{ -type => 'File::stat' }, qw/ name /
, the + force the following curly brace {} to be interpreted as an hash element and not a code block. so that's simply an anonymous hash entry.
"qw/name/" is just useless here because there's only one word...
Finally that's not very complex, just extremely obfuscated...
Here's what Data::Dumper can tell us about this structure, finally :
$VAR1 = { 'scalar' => [ { '-type' => 'File::stat' }, 'name' ], 'new' => 'new' };
It's way better, isn't it ?
update : I forgot to mention that this structure looks like a pseudo-hash.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://531385]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (4)
As of 2022-05-22 05:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (79 votes). Check out past polls.

    Notices?