perlbless

unbless implementation in Perl?

As many Perl developers know, unbless is used to remove the blessing from objects.
I am trying to understand how does it internally work by investigating its implementation.
I tried to check its implementation in its package Data::Structure::Util. Here's the Source:

sub unbless {
    unbless_xs( $_[0] );
}

Where may I find unbless_xs sub implementation/source ?

Solution

  • It's implemented in C, you can check the source of the function at https://metacpan.org/source/ANDYA/Data-Structure-Util-0.16/Util.xs#L239