The test is looking to see that the scalar does not look like a string

You want SvPOK(sv) which is defined to be SvFLAGS(sv) & SVf_POK and is available as $sv->POK.