Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^2: Converting Hashes to Objects

by haukex (Bishop)
on May 17, 2020 at 14:39 UTC ( #11116858=note: print w/replies, xml ) Need Help??


in reply to Re: Converting Hashes to Objects
in thread Converting Hashes to Objects

does this differ from Hash::AsObject

Yes, since that uses AUTOLOAD, which means it doesn't provide full typo prevention:

use Hash::AsObject; my $h = Hash::AsObject->new( foo => "bar" ); print $h->fOo, "\n"; # warning about undef use Util::H2O; my $o = h2o { foo => "bar" }; print $o->fOo, "\n"; # dies

Plus Util::H2O has the extra goodies like custom methods that I wrote about.

Replies are listed 'Best First'.
Re^3: Converting Hashes to Objects
by 1nickt (Abbot) on May 17, 2020 at 16:39 UTC

    Interesting, thanks! I noticed after your reply that it's not possible to use Hash::AsObject with L in one-liners (which I hadn't tried, I think); I imagine because of dueling AUTOLOAD trickery.

    $ perl -ML -wE 'my $h = Hash::AsObject->new( foo => "bar" ); say $h->f +oo' Can't locate foo.pm in @INC (you may need to install the foo module)
    😞

    I am usually under strictures(2) to catch typos, so it's not usually a feature I need in packages:

    $ perl -MHash::AsObject -wE 'my $h = Hash::AsObject->new( foo => "bar" + ); say $h->f0o; say 42' Use of uninitialized value in say at -e line 1. 42
    $ perl -MHash::AsObject -Mstrictures=2,1 -wE 'my $h = Hash::AsObject-> +new( foo => "bar" ); say $h->f0o; say 42' Use of uninitialized value in say at -e line 1.

    Thanks!


    The way forward always starts with a minimal test.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (4)
As of 2020-09-19 00:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    If at first I donít succeed, I Ö










    Results (114 votes). Check out past polls.

    Notices?