On Tuesday 25 October 2016 06:48:09 Father Chrysostomos wrote: > On Oct 23, 2016, at 12:42 PM, pali@cpan.org wrote: > > For me it makes sense to call SvGETMAGIC/SvSETMAGIC so $/ will be > > supported too... > > That makes sense to me, too. Ok. Now I added SvGETMAGIC(sv) before SvPOK(sv) and SvSETMAGIC(sv) after SvUTF8_on(sv) (resp. SvUTF8_off(sv)). I created tests for tied scalars, but in perl 5.14 that tests are failing. They pass under bleed perl. Now I looked deeply and it looks like that perl 5.14 does *not* set SvPOK flag for string-tied scalars :-( After calling _utf8_on Devel::Peek tell me this: SV = PVMG(0x1070220) at 0x10eb3d0 REFCNT = 1 FLAGS = (PADMY,GMG,SMG,RMG,pPOK) ... It is some know bug in older perls, that SvPOK is not set after calling SvGETMAGIC on string tied scalars? Or should I use SvPOKp(sv)? Because pPOK is set!Thread Previous | Thread Next