Re: Array to hash converstion

Converting @data_list to a hash is easy. See below code. Basically if you assign an array to a hash, Perl treats this as key, value pairs. my %hash = @data_list; is all that is needed.

#!/usr/bin/perl -w
use strict;

my @value_pairs = qw (one abc two xyz);
my %hash = @value_pairs;

foreach my $key (keys %hash)
{
   print "key $key is $hash{$key}\n";
}
__END__
prints:
key one is abc
key two is xyz
[download]

Comment on Re: Array to hash converstion Select or Download Code

Replies are listed 'Best First'.
Re^2: Array to hash converstion by NetWallah (Canon) on Jul 15, 2009 at 05:26 UTC
Your solution, while valid (++) in the "normal" case, will probably not work for the O.P. His array contains hashrefs, so assigning that to a hash will not be usable. Potentia vobiscum ! (Si hoc legere scis nimium eruditionis habes)	[reply]
Re^3: Array to hash converstion by Marshall (Canon) on Jul 15, 2009 at 05:57 UTC
Yes, I did engage in a bit of "mind-reading" here. I didn't see any example input data or any example output data. I wound up not assuming that this was working code and I took a guess as to intent based upon the context of the question. If the OP is comfortable with AOH and wants HOH, then 1)So what are the keys to this HOH supposed to be? I didn't see anything about that. 2)Also, if the OP really is comfortable working with AoH, then AoH to HoH isn't that big of a leap and I would have expected some kind of "this is my attempt" code. I try to helpful. But, in general the usefulness and quality of the responses depends a LOT on the clarity of the question.	[reply]