Perl Tk éxécuter des commandes avec sudo

Bonjour,

je veux me faire une petite application avec Perl Tk pour gérer une connection VPN avec vpnc.

vpnc fonctionne très bien en ligne de commande mais j'aimerais avoir une petite fenêtre avec un bouton "Connecter" et "Déconnecter".

Le bouton connecter doit lancer la commande "sudo vpnc /etc/vpnc/maconfig.conf", normalement en console je doit entrer mon password sudo et mon mot de passe VPN...si j'utilise

Code:

---

system("sudo vpnc /etc/vpnc/maconfig.conf")

---

rien de me demande d'entrer mes passwords.

Est-ce que quelqu'un sait comment bien lancer cette commande et interagir avec l'utilisateur ?

Merci!

Salut,

Désolé de t'avoir laissé tombé sur l'autre topic. Pendant un moment, j'ai bêtement pensé à utiliser un modules comme Expect qui va permettre de dialoguer avec une application. Et puis j'ai eu l'idée de taper sudo sur http://search.cpan.org/ . Voilà le résultat ;)