$hash{ $array[$_] } = $_ for (0..$#array);