my $data = {key => "THIS: "};
my $val = "HI THIS WORKS";
$data{key} .= $val;
print "$data{key}";
__END__
HI THIS WORKS