Re^2: How to extract the values of an Array of Hashes

I would much rather depend on Tie::IxHash than having to prepend my keys with numbers to preserve order. This could lead to a less than desirable maintenance issue down the road.

use strict;
use warnings;
use Data::Dumper;
use Tie::IxHash;

tie(my %To_Send, 'Tie::IxHash',
    LI_VN_Mode                    => '00100011', # 8 bit
    Stratum                       => '0',        # 8 bit
    Poll                          => '0',        # 8 bit
    Precision                     => '0',        # 8 bit
    Root_Delay                    => '0',        # 32 bit
    Dispersion                    => '0',        # 32 bit
    Reference_Identifier          => '0',        # 32 bit
    Reference_Timestamp_Sec       => '0',        # 32 bit
    Reference_Timestamp_Micro_Sec => '0',        # 32 bit
    Originate_Timestamp_Sec       => '0',        # 32 bit
    Originate_Timestamp_Micro_Sec => '0',        # 32 bit
    Receive_Timestamp_Sec         => '0',        # 32 bit
    Receive_Timestamp_Micro_Sec   => '0',        # 32 bit
    Transmit_Timestamp_Sec        => '0',        # 32 bit
    Transmit_Timestamp_Micro_Sec  => '0',        # 32 bit
);

print Dumper \%To_Send;
[download]

UPDATE: I never said anything about scalability. I stated my preferences. You can labor away at such code all you want to. How you derive "decrease dependencies" from "reduce defined scalars" makes zero sense as well.

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

Comment on Re^2: How to extract the values of an Array of Hashes Download Code

Replies are listed 'Best First'.
Re^3: How to extract the values of an Array of Hashes by thanos1983 (Parson) on Jul 22, 2015 at 20:45 UTC
Hello again jeffa, Nice alternative solution, using this module. I will check it and give a try. Thanks again for the time and effort. Seeking for Perl wisdom...on the process of learning...not there...yet!	[reply] [d/l] [select]
Re^3: How to extract the values of an Array of Hashes by 1nickt (Canon) on Jul 22, 2015 at 17:38 UTC
That works too, of course, and jeffa is right that trying to manually order hash elements is not very scaleable. But the OP said he wanted to "reduce the defined scalars" in his script, so I would think that he would prefer to not increase the number of dependencies, also. He is passing the hash to a sub whose parameters are known and stable, and the numbering scheme leaves room for easy maintenance and expansion. In this case numbering the hash elements is fine IMO. The way forward always starts with a minimal test.	[reply] [d/l]


Keep It Simple, Stupid
	PerlMonks