exilepanda has asked for the wisdom of the Perl Monks concerning the following question:
Version 1 - works fine
Version 2 - I want to change the constructor interfacepackage SomeMod; sub new { my $obj = bless{ Order=>[], Items=>{}, Config=>{}, }, shift; while ( @_ ) { my ( $key, $val ) = ( shift, shift ) ; push @{$obj->{Order}}, $key; $obj->{Items}{$key} = $val; } return $obj } 1; ### main use SomeMod; my %Items_Key_Value_pairs = (A => "Apple", B => "Banana", C => "Cat"); my $obj = SomeMod -> new ( %Items_Key_Value_pairs ) ;
I know that's not an ARRAY ref, but since I want to learn the appear order, can I do anything to access this HASH ref like other ordinary array ( they still a list right) ?package SomeMod; sub new { my $obj = bless{ Order=>[], Items=>{}, Config=>{}, }, shift; my %arg = @_ ; while ( @{$arg{Items}} ) { # BLOW! 'Not an ARRAY reference' my ( $key, $val ) = ( shift, shift ) ; push @{$obj->{Order}}, $key; $obj->{Items}{$key} = $val; } # ... deal with config ... return $obj } 1; ### main use SomeMod; my %Items_Key_Value_pairs = (A => "Apple", B => "Banana", C => "Cat"); my %some_config_param = (); my $obj = SomeMod -> new ( Items => { %Items_Key_Value_pairs } , Config => { %some_config_param } ) ;
Or, when I do Items => {... }, this list already "digested" in a hash form thus not feasible to access like an array anymore?
Though I already have a work around by using Items => [ A => "Apple", B => "Banana" ... ], I still interest to know if I can force to access a Hash ref like Array, same as I did in Version 1
Thank you very much
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Force access a Hash ref as Array ref
by tobyink (Canon) on Jul 20, 2021 at 06:45 UTC | |
Re: Force access a Hash ref as Array ref
by haj (Vicar) on Jul 20, 2021 at 06:52 UTC | |
Re: Force access a Hash ref as Array ref
by GrandFather (Saint) on Jul 20, 2021 at 07:00 UTC | |
by Anonymous Monk on Jul 20, 2021 at 14:58 UTC | |
Re: Force access a Hash ref as Array ref
by exilepanda (Friar) on Jul 20, 2021 at 07:24 UTC | |
Re: Force access a Hash ref as Array ref
by perlfan (Vicar) on Jul 20, 2021 at 22:17 UTC | |
A reply falls below the community's threshold of quality. You may see it by logging in. |
Back to
Seekers of Perl Wisdom