Help for this page
$hash = { 'foo.bar' => 'foo.bar_v', 'foobar' => 'foobar_v' ... print $hash->{foo.bar}; __DATA__ foobar_v <-- note we have lost the . in the key so get the wrong val +ue
$VAR1 = { ... print "Response: ", $VAR1->{'wellmed'}->{'wellmed.ack'}->{'wellmed.res +ponse'}, "\nErrors: ", $VAR1->{'wellmed'}->{'wellmed.ack'}->{'errors'},