Discussion :

[kimous]

Salut!

J'ai un tout petit soucie mais ça m'embête!...
Je voudrais faire en sorte que lorsque l'on appuis sur un bouton, sa appel un script Perl préalablement créer.

Voila l'extrait de mon script TK concerné.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
$menu_App = $barre_menu -> Menubutton (
                                  -font => "{batang} 8 {bold}" ,
                                  -text => 'Applications' ,
                                  -tearoff => 0 ,
                                  -menuitems => [
                                      [ 'command' => 'Récup Log Tina',
                                        -command => system ("U/...../Script Final Tina.pl")]
                                     ]
                                  ) ;

Le problème c'est que SYSTEM s'exécute dans le lancement du script TK... et non lorsque j'appuie sur le bouton..

J'ai une solution où je met system dans un subroutine et faire en sorte que le bouton appel la subroutine et non directement system.... mais je voudrais éviter de surcharger mon script avec des subroutine qui je pense sont inutiles ici...

Merci d'avance pour vos réponses!

[djibril]

bah non dans ton cas, la soubroutine n'est pas une surcharge, mais exactement ce qu'il faut faire

[kimous]

OK bon bein j'avais trouvé la bonne solution alors

Désolé pour le dérangement.

Merci beaucoup djibril!