#!/usr/bin/perl 

use Gtk2 '-init'; 
use Gtk2::GladeXML; 
use aviam;

my $programa = Gtk2::GladeXML->new('main.glade');
my $finestra= $programa->get_widget('window1');
                                                                                  
####

$finestra->show();
$programa->signal_autoconnect_from_package('aviam'); 


Gtk2->main;
