Nothing jumps out on CPAN, but it should be trivial to use either syscall or Inline::C to call it.
In reply to Re: pivot_root in perl ? by Fletch in thread pivot_root in perl ? by abachus