B::Flags - Friendlier flags for B
use B::Flags; print B::main_root->flagspv; print B::main_root->privatepv; print $some_b_sv_object->flagspv;
$foo->flags when passed an object in the
B class will produce a relatively meaningless number, which one would need to grovel through the Perl source code in order to do anything useful with. This module adds
flagspv to the SV and op classes and
privatepv to the op classes, which makes them easier to understand.
Warning: This module is not guaranteed compatible with any version of Perl below 5.7.0; however, I'd like to make it so compatible, so if it fails to compile, mail me. There's probably an
#ifdef I need to add somewhere...
Returns stringification of the OP flags.
Returns stringification of the OP private flags.
Returns stringification of the SV flags.
With the optional type only the flags for the given SvTYPE are used. type 0 is for the SvFLAGS only. This way you can seperate between sv->FLAGS and specialized AvFLAGS, GvFLAGS, CvFLAGS, ... in seperate struct fields.
Simon Cozens, email@example.com
Abhijit Menon-Sen, firstname.lastname@example.org
Reini Urban, email@example.com
AL&GPL. Copyright 2001 Simon Cozens Copyright 2010,2013 Reini Urban