Select Code to Download

my @array = qw( foo bar baz );
for (@array) {
    eval "$_ = 'value'"; # Error here!!!
}

#name your hash
my %hash; 
...

#and to print it
print $hash{$varName}, "\n";