<?xml version="1.0" encoding="windows-1252"?>
<node id="1008291" title="Re: better array to hash conversion" created="2012-12-11 07:28:23" updated="2012-12-11 07:28:23">
<type id="11">
note</type>
<author id="1001958">
karlgoethebier</author>
<data>
<field name="doctext">
&lt;p&gt;Like this..&lt;/p&gt;
&lt;code&gt;

use Data::Dumper;

my @array = (a..z);

my %hash = map { $array[$_] =&gt; $_ } 0..$#array;

print Dumper(\%hash);

__END__

$VAR1 = {
          'w' =&gt; 22,
          'r' =&gt; 17,
          'a' =&gt; 0,
          'x' =&gt; 23,
          'd' =&gt; 3,
          'j' =&gt; 9,
          'y' =&gt; 24,
          'u' =&gt; 20,
          'k' =&gt; 10,
          'h' =&gt; 7,
          'g' =&gt; 6,
          'f' =&gt; 5,
          't' =&gt; 19,
          'i' =&gt; 8,
          'e' =&gt; 4,
          'n' =&gt; 13,
          'v' =&gt; 21,
          'm' =&gt; 12,
          's' =&gt; 18,
          'l' =&gt; 11,
          'c' =&gt; 2,
          'p' =&gt; 15,
          'q' =&gt; 16,
          'b' =&gt; 1,
          'z' =&gt; 25,
          'o' =&gt; 14
        };

&lt;/code&gt;

&lt;p&gt;&lt;b&gt;Update&lt;/b&gt;...i cheated this one ;-)&lt;/p&gt;
&lt;code&gt;
@hash{@array} = 0..$#array;
&lt;/code&gt;
[doc://map]
&lt;p&gt;Regards, Karl&lt;/p&gt;
&lt;!-- Node text goes above. Div tags should contain sig only --&gt;
&lt;div class="pmsig"&gt;&lt;div class="pmsig-1001958"&gt;
&lt;p&gt;«The Crux of the Biscuit is the Apostrophe»&lt;/p&gt;

&lt;/div&gt;&lt;/div&gt;</field>
<field name="root_node">
1008288</field>
<field name="parent_node">
1008288</field>
</data>
</node>
