Another reason some things are done in XS is out of convenience in getting Perl to do things that Perl isn't made to do. There are modules written that mess around inside of Perl's internals in ways that would be really hard to do, if not nearly impossible to do, in Perl code.