leto a écrit :
% apt-file search Gtk.pm
...
libgtk-perl: usr/lib/perl5/Gtk.pm
... |
|
voici mon script test.pl (script de test pour verifier le fonctionnement de l'installation) :
#!/usr/bin/perl -w
use Gtk; # charge le module Gtk-Perl
use strict; # une bonne idée pour tout script Perl non-trivial
init Gtk; # initialise Gtk-Perl
# variables convenables pour vrai et faux
my $false = 0;
my $true = 1;
# création d'un widget
my $window = new Gtk::Window( "toplevel" );
my $button = new Gtk::Button( "Goodbye World" );
# enregistrement des rappels
$window->signal_connect( "delete_event", \&CloseAppWindow );
$button->signal_connect( "clicked", \&CloseAppWindow );
# montre le bouton
$button->show();
# déclare les attributs de la fenêtre et les montre
$window->border_width( 15 );
$window->add( $button );
$window->show();
# boucle d'évènement Gtk
main Gtk;
# ne devrait jamais arriver là
exit( 0 );
### la fonction de rappel pour fermer la fenêtre
sub CloseAppWindow { Gtk->exit( 0 ); return $false; }
selon toi leto3 je doit rajouter dans mon code:
libgtk-perl: usr/lib/perl5/Gtk.pm
ou alors placer mon script dans ce repertoire c'est bien ca ?
je debute je comprend pas trop.
des que j'aurais un exemple de base ca ira comme sur des roulettes.