my %hash; for $var (@array) { while (<STDIN>) { chomp; $hash{$_} = $var; } } [download]
In reply to Re: array to hash by hotshot in thread array to hash by johnirl