Re: Idiomize This - Hash to Array of Hashes

my $speedlist = $heap->{config}{freq_gui}{speedlist}; # (updated, see 
+AnomalousMonk below)
push @cmd_choices, map { {name=>$_, value=>$speedlist->{$_}} } keys %$
+speedlist;
[download]

my ($k,$v); push @c, {n=>$k, v=>$v} while ($k,$v) 
    = each %$speedlist;
[download]

-Paul

Comment on Re: Idiomize This - Hash to Array of Hashes Select or Download Code

Replies are listed 'Best First'.
Re^2: Idiomize This - Hash to Array of Hashes by roubi (Hermit) on Apr 20, 2009 at 01:14 UTC
The push isn't necessary here no? `my $speedlist = ....; my @cmd_choices = map {{-name=>$_, -value=>$speedlist->{$_}}} keys %$s +peedlist;` [download]	[reply] [d/l]
Re^3: Idiomize This - Hash to Array of Hashes by johnr (Acolyte) on Apr 20, 2009 at 01:24 UTC
Thanks to both of you: `my $speedlist = $heap->{config}{freq_gui}{speedlist}; my @cmd_choices = map {{-name=>$_, -value=>$speedlist->{$_}}} keys + %$speedlist;` [download]	[reply] [d/l]
Re^3: Idiomize This - Hash to Array of Hashes by jettero (Monsignor) on Apr 20, 2009 at 10:04 UTC
It wasn't clear to me if the @cmd_choices already had data in it. If it did, the push was necessary, otherwise, no. -Paul	[reply]
Re^2: Idiomize This - Hash to Array of Hashes by AnomalousMonk (Archbishop) on Apr 20, 2009 at 01:24 UTC
`my $speedlist = ....;` [download] The OPer may not be aware that you are now creating and dealing directly with a hash reference, and that the full statement would be `my $speedlist = $heap->{config}{freq_gui}{speedlist};` [download] Update: The OPer may not be aware ... I take that back. Evidently, he is.	[reply] [d/l] [select]
Re^3: Idiomize This - Hash to Array of Hashes by johnr (Acolyte) on Apr 20, 2009 at 01:32 UTC
I wasn't aware of it until it wouldn't compile! Thanks, John	[reply]