my %newhash = map {{ $_->{key} } = >$_->{value} } @data_list;
>perl -wMstrict -MData::Dumper -le "my @d_pairs = ( { key => 'foo', value => 'bar' }, { key => 'fee', value => 'fie' }, ); my %hash = map { $_->{key} => $_->{value} } @d_pairs; print Dumper \%hash; " $VAR1 = { 'fee' => 'fie', 'foo' => 'bar' };
In reply to Re^2: Array to hash converstion
by AnomalousMonk
in thread Array to hash converstion
by gem555
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |