my %hash = do{ my @array; push @array, $loader[$_] => $_ for(0..$#loader); @array }