<?xml version="1.0" encoding="UTF-8"?>
<!-- Generated with glade 3.22.1 -->
<interface>
  <requires lib="gtk+" version="3.20"/>
  <object class="GtkApplicationWindow" id="window">
    <property name="can_focus">False</property>
    <property name="startup_id">app.test</property>
    <child>
      <object class="GtkBox" id="box">
        <property name="visible">True</property>
        <property name="can_focus">False</property>
        <property name="orientation">vertical</property>
        <child>
          <object class="GtkImage" id="image">
            <property name="visible">True</property>
            <property name="can_focus">False</property>
            <property name="pixel_size">171</property>
            <property name="icon_name">applications-system</property>
          </object>
          <packing>
            <property name="expand">False</property>
            <property name="fill">True</property>
            <property name="position">0</property>
          </packing>
        </child>
        <child>
          <object class="GtkLabel" id="label">
            <property name="visible">True</property>
            <property name="can_focus">False</property>
            <property name="label" translatable="yes">Hello World</property>
          </object>
          <packing>
            <property name="expand">False</property>
            <property name="fill">True</property>
            <property name="padding">1</property>
            <property name="position">1</property>
          </packing>
        </child>
        <child>
          <object class="GtkButton" id="button">
            <property name="label" translatable="yes">Quit</property>
            <property name="visible">True</property>
            <property name="can_focus">True</property>
            <property name="receives_default">True</property>
            <property name="action_name">win.fullscreen</property>
          </object>
          <packing>
            <property name="expand">False</property>
            <property name="fill">True</property>
            <property name="position">2</property>
          </packing>
        </child>
      </object>
    </child>
  </object>
</interface>

#! /usr/bin/perl
BEGIN {
  use Glib::Object::Introspection;
  Glib::Object::Introspection->setup(
    basename => 'Gio',
    version => '2.0',
    package => 'Glib::IO');
}

package MyWindow;
use strict;
use warnings;

use utf8;
binmode STDOUT, ':utf8';

use Gtk3;
use Glib ('TRUE', 'FALSE');
use base 'Gtk3::ApplicationWindow';

sub new {
    my $window;
     
    # a buidler to add the UI designed with Glade to the grid:
    my $builder = Gtk3::Builder->new();
    
    # get the file (if it is there)
    $builder->add_from_file('test.glade') or die 'file not found';
    $window = $builder->get_object('window');
	
    # fullscreen action
    my $fullscreen_action = Glib::IO::SimpleAction->new('fullscreen',undef);
    $fullscreen_action->signal_connect('activate'=>\&fb_cb);
    $window->add_action($fullscreen_action);
	
    return $window;	
}

sub fb_cb {
    print "YEAH\n";
}
	
package main;
use strict;
use warnings;
 
use utf8;
binmode STDOUT, ':utf8';
 
use Gtk3;
use Glib ('TRUE', 'FALSE');

my $app = Gtk3::Application->new('app.test', 'flags-none');
 
$app->signal_connect('activate' => \&_build_ui );
 
$app->run(\@ARGV);
 
exit;

sub _build_ui {
	my ($app) = @_;
	my $window = MyWindow->new();
	$app->add_window($window);
	$window->show_all();
}