#!/usr/bin/perl
#TITLE: Gnome applet
#REQUIRES: Gtk Gnome
use Gnome;
init Gnome "applet.pl";
$NAME = 'Applet';
init Gnome::Panel::AppletWidget 'applet.pl';
$a = new Gnome::Panel::AppletWidget;
realize $a;
$b = new Gtk::Button "Button";
$b->set_usize(50,50);
show $b;
$a->add($b);
show $a;
gtk_main Gnome::Panel::AppletWidget;