Gtk2-Perl
 | The topic of this article may not meet Wikipedia's general notability guideline. (February 2008) |
GTK2-Perl is a set of Perl wrappers for the GTK+ GUI library and the other GNOME platform libraries. GTK2-Perl is free software and licensed under the LGPL. Developers and interested parties can usually be found on the IRC channel #gtk-perl on irc.gnome.org.
GTK2-Perl is part of the official GNOME Platform Bindings release[1], along with C++ bindings, Python bindings and Java bindings.
Example
use Gtk2 '-init';
$window = Gtk2::Window->new('toplevel');
$window->set_title("Hello World!");
$button = Gtk2::Button->new("Press me");
$button->signal_connect(clicked => sub { print "Hello again - the button was pressed\n"; });
$window->add($button);
$window->show_all;
Gtk2->main;
0;
The sample program creates a GTK+ Window titled "Hello World!". The window contains a Button labelled "Press me." When the button is pressed, the message "Hello again - the button was pressed" is displayed on the console via the callback inside the anonymous subroutine connected to the "clicked" signal.