my %Hood;
$Hood{child} = "a young kid";
$test = "child";
$Hood{$test} = "an old man";