El mensaje de error es este:
Using text Syntax Highlighting
Gtk-WARNING **: Attempting to add a widget with type GtkButton to a GtkWindow, but as a GtkBin subclass a GtkWindow can only contain one widget at a time; it already contains a widget of type GtkButton at ./code_19804.pl line 10.
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
Quiere decir que en un objeto GtkBin solo puede contener un
widget cada vez. Y ya está ocupado por el primer botón.
Necesitas otro tipo de objeto que pueda almacenar más elementos.
Aquí, por ejemplo, usaré un HBox. Además, aprovecharé para decirle a la ventana qué tiene que hacer cuando deseemos cerrar la ventana pulsando en el botón 'x'.
Using perl Syntax Highlighting
#!/usr/bin/perl -w
use Gtk2 '-init';
$ventana = Gtk2::Window->new('toplevel');
$ventana->set_title('Hello World!');
$ventana->set_border_width(50);
$ventana->signal_connect(delete_event => sub {Gtk2->main_quit()});
$boton = Gtk2::Button->new('Hello World!');
$boton1 = Gtk2::Button->new('Hola 2');
#$ventana->add($boton);
#$ventana->add($boton1);
$box = Gtk2::HBox->new(TRUE,10);
$box->add( $boton);
$box->add( $boton1);
$ventana->add($box);
$ventana->show_all;
# Empieza el show...
Gtk2->main;
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
...)
