1TYPEMAP 2varspec_t T_VARSPEC 3vartype_t T_VARTYPE 4 5INPUT 6T_VARSPEC 7 if (SvPOK($arg)) 8 _deconstruct_variable_name($arg, &$var); 9 else if (SvROK($arg) && SvTYPE(SvRV($arg)) == SVt_PVHV) 10 _deconstruct_variable_hash((HV*)SvRV($arg), &$var); 11 else 12 croak(\"varspec must be a string or a hashref\"); 13 _check_varspec_is_valid(&$var); 14 15T_VARTYPE 16 if (!SvPOK($arg)) 17 croak(\"vartype must be a string\"); 18 $var = string_to_vartype(SvPV_nolen($arg)); 19