Help for this page
void Foo( str ) char * str PPCODE: Foo(str, strLen);
T_STR_AND_LEN ".(unshift(@line, ( ... SV * TmpSV = $arg; $var = ($type) SvPV( TmpSV , ${\$var}Len); };