The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
context_t*	O_OBJECT
socket_t*	O_OBJECT
message_t*	O_OBJECT
error_t*	O_OBJECT
size_t			T_UV
std::string*			T_STRINGPTR
std::string			T_STRING

INPUT

T_STRING
	$var = std::string(SvPV_nolen($arg))

T_STRINGPTR
	$var = new std::string(SvPV_nolen($arg))

OUTPUT

T_STRING
	$arg = newSVpvn($var.c_str(), $var.length());

T_STRINGPTR
	$arg = newSVpvn($var->c_str(), $var->length());