$perl_scalar = $json->decode($hash_reference)