Your issue is that Perl does not like hash keys in the form 'foo.bar' - if you don't quote the 'foo.bar' it is FUBAR.

$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
[download]

You get at the data as shown by quoting the 'str.str' keys so as to avoid the issue.

$VAR1 = 
{ 
    'wellmed' => {  'wellmedack' => {}, 
                    'wellmed.ack' => {  'errors' => '0', 
                                        'wellmed.response' => 'User da
+ta updated for ID: aac20fd41e07ea11d9bfc1ac192a16aa77', 
                                        'responses' => '1' 
                                     } 
                  } 
};

print "Response: ", $VAR1->{'wellmed'}->{'wellmed.ack'}->{'wellmed.res
+ponse'},
      "\nErrors: ", $VAR1->{'wellmed'}->{'wellmed.ack'}->{'errors'},
[download]