Another possible solution is to create a shell script or an expect script that could do the sudo cmd and supply the password to it, then call this script from perl. It is a bit of an ugly solution, but should work.