http://qs321.pair.com?node_id=11135199


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