#!/usr/bin/perl
use strict;
use warnings;
use Gtk2::Notify -init, 'XY';
my $n = Gtk2::Notify->new('X, Y Test', 'This notification should point to 150, 10');
$n->set_hint_int32('x', 150);
$n->set_hint_int32('y', 10);
$n->show;
#!/usr/bin/perl
use strict;
use warnings;
use Gtk2::Notify -init, 'XY';
my $n = Gtk2::Notify->new('X, Y Test', 'This notification should point to 150, 10');
$n->set_hint_int32('x', 150);
$n->set_hint_int32('y', 10);
$n->show;