How do I use Gnome's sudo dialog from perl?

I need to run 开发者_StackOverflowa privilegied command on a gtk2-perl user program. I'm googling about how to use the default dialog for getting root privilegies on Gnome, but can find an answer.

The only approach I have is to ask the password and use in a command

"echo $passwod | sudo -S priv-command"

but it's a bit ugly. I'm looked for the old gtksudo and similar helper programs but seems that there aren't in Ubuntu 10.10

Any pointers?

Not gtksudo, but GKSu is the name. The same thing in KDE is called kdesu.

The dialog you are talking of is from PolicyKit.