mallinfo from perl

Is there an interface to mallinfo() from perl lurking anywhere?
I thought to include its info in my program as development diagnostics
(if available of course, which it's not on all systems, and leaving
aside the question of quite how useful it is or isn't ...).