TYPEMAP
FCGI T_PTROBJ
FCGI::Stream T_PTROBJ
GLOBREF T_GLOBREF
HASHREF T_HASHREF
INPUT
T_GLOBREF
if (SvROK($arg) && isGV(SvRV($arg))) {
$var = (GV*)SvRV($arg);
} else
croak(\"$var is not a GLOB reference\");
T_HASHREF
if (SvROK($arg) && SvTYPE(SvRV($arg)) == SVt_PVHV) {
$var = (HV*)SvRV($arg);
} else
croak(\"$var is not a reference to a hash\");