Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: Force access a Hash ref as Array ref

by GrandFather (Saint)
on Jul 20, 2021 at 07:00 UTC ( #11135199=note: print w/replies, xml ) Need Help??


in reply to Force access a Hash ref as Array ref

sub new { my $obj = bless{ Order => [], Items => {}, Config => {}, }, shift @_; my (undef, $itemValues) = @_ ; my @asList = %$itemValues; while (@asList) { my ($key, $val) = splice @asList, 0, 2;
Optimising for fewest key strokes only makes sense transmitting to Pluto or beyond

Replies are listed 'Best First'.
Re^2: Force access a Hash ref as Array ref
by Anonymous Monk on Jul 20, 2021 at 14:58 UTC

    This appears to change the signature of new() to SomeMod->new( undef, { name => value ... } ). Not to mention that it loses the order of the arguments.

    OTOH splice @asList, 0, 2 is a reasonable alternative to ( shift @asList, shift @asList ).

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (9)
As of 2021-10-18 10:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My first memorable Perl project was:







    Results (73 votes). Check out past polls.

    Notices?