newSV newStrSV, test with TestMonadGlue
define sin / die wrapper in perl-glue.c