Re: How to create hash out of an array elements?

The map callback never gets called since you didn't pass any list to transform, so map returns nothing.

You could create the desired list of two elements as follows:

my %sizes = ( $symbolsizes[0] => $symbolsizes[1] );
[download]

But really, all you need is the following:

my %sizes = @symbolsizes;
[download]

PS — The language is called "Perl", not "PERL".

Comment on Re: How to create hash out of an array elements? Select or Download Code

Replies are listed 'Best First'.
Re^2: How to create hash out of an array elements? by jojojo (Initiate) on Nov 17, 2011 at 09:19 UTC
Thanks. This seems to be working. Now I am not able to print the values. The following code works: `print "The size for $symbolsizes[0] is $sizes{$symbolsizes[0]}";` [download] But when I specify the name, it doesnt work. And this code is of no use if it can't print the values when the function name is specified. Please help. `print "The size for function is $sizes{function}";` [download] Assume function to be an element of the array symbolsizes.	[reply] [d/l] [select]
Re^3: How to create hash out of an array elements? by ikegami (Patriarch) on Nov 17, 2011 at 10:02 UTC
Then `$symbolsizes[0]` doesn't contains `function`. Perhaps it contains a trailing newline that you didn't remove using chomp?	[reply] [d/l] [select]
Re^4: How to create hash out of an array elements? by aaron_baugher (Curate) on Nov 17, 2011 at 12:24 UTC
And to see exactly what your hash does contain, use Data::Dumper (or one of its descendants). (I'm passing Dumper a reference to the hash because it prints it in a more hash-like manner that way.) `abaugher@Aliantha ~$ cat doit #!/usr/bin/perl use Modern::Perl; my @array = ( 'key', 'value' ); my %hash = @array; say "The value of 'key' is '$hash{key}'"; use Data::Dumper; print Dumper \%hash; abaugher@Aliantha ~$ perl doit The value of 'key' is 'value' $VAR1 = { 'key' => 'value' };` [download] Aaron B. My Woefully Neglected Blog, where I occasionally mention Perl.	[reply] [d/l]


Do you know where your variables are?
	PerlMonks