According to futex man page:
This system call is typically used to implement the contended case of a lock in shared memory, as described in futex(7)
So my first question: is your Perl script using "Perl Threads" and are you having contention on a shared memory variable?