То, что надо. С несущественными изменениями полет нормальный :)
SV* gv = newSV(0);
gv_init_pvn(gv, gv_stashpvn("OK", 0, 0), "VICTORY", 7, GV_ADDMULTI);
22 ноября 2017 г., 18:53 пользователь Sergey Aleynikov via Moscow-pm <
[email protected]> написал:
> Добрый день,
>
> 22 ноября 2017 г., 16:30 пользователь Толян II via Moscow-pm
> <[email protected]> написал:
> > Понадобилось в perlxs генерировать анонимные typeglob.
>
> Минимальный код выглядит примерно так,
>
> SV* gv = newSV(0);
> gv_init_pvn(gv, gv_stashpvn("main", 4, 0), "test", 4, GV_ADDMULTI);
>
> Но, в зависимости от того, как будете использовать результат, он может
> значительно измениться - т.к. какие-то функции ждут валидного EGV и
> т.д.
>
> Best regards,
> Sergey Aleynikov
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org
>
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
