Select Code to Download

$VAR1 = {
  'response_1.3.6.1.2.1.2.2.1.12.27' => {
...
      ]
    ]
  },

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