my @arr = 'a' .. 'e';

my %hash;

@hash{0 .. $#arr} = @arr;