use strict;
use warnings;
use feature "say";

use Gtk3 qw( -init );

my $builder;
my $window;
$window = Gtk3::Window->new();
$builder= Gtk3::Builder->new();
$builder->add_from_file("test.glade");
$builder->connect_signals(undef);

my $main_window = $builder->get_object("window1");

$main_window->show_all;

Gtk3::main;

package Handlers;

sub exit{
    Gtk3::main_quit;
}