#!/usr/bin/perl

use Gnome;

my $name = "Hello world";

init Gnome $name;

my $w = new Gtk::Window -toplevel;

my $label = new Gtk::Label "Hello, world";
$w->add($label);

show_all $w;

main Gtk;