use strict;
my $bob="hai";
my @array=('hai');
my %random_name = (
$bob => "something");
foreach (@array) {
                   my $value = $random_name{$_};
                   print "value: $value\n";
                   };