my %key_hash= %{$VAR1};
$key = 'response_1.3.6.1.2.1.2.2.1.12.27';
$oid = '1.3.6.1.2.1.2.2.1.12.27';

##</code><code>##

print $key_hash{$key}{$oid}[0]->[1];

##</code><code>##

 
print "@{$key_hash{$key}{$oid}[0]}\n";