Probably be easiest to see what the C's doing and use that to reimplement the functionality in perl.

Yeah, that's pretty much what I had planned on doing from the beginning if I couldn't find someone else's implementation of the same. [I'd just rather avoid re-inventing the wheel if the wheel exists and is wheel-like enough for my purposes.]