GLib-GObject-WARNING **: invalid (NULL) pointer instance 
GLib-GObject-CRITICAL **: g_signal_connect_data: assertion `G_TYPE_CHECK_INSTANCE (instance)' failed 
...
Can't locate object method "timeout_add" via package "Gtk2"
...
Usage: Gtk2::main(class)

##</code><code>##

site\lib\Gtk2\api.pod
260:=item gtk_timeout_add    => Glib::Timeout->add
262:=item gtk_timeout_remove => Glib::Source->remove

##</code><code>##

#!/usr/bin/perl --
use strict;
use warnings;
# use Gtk2;
use Gtk2 -init; 

my $window = Gtk2::Window->new ('toplevel');
my $button = Gtk2::Button->new ('Quit');
$button->signal_connect (clicked => sub { Gtk2::main_quit });
$window->add ($button);
$window->show_all;
my $data = 'data';
# my $id = Gtk2->timeout_add(1000, \&handler, $data);
my $id = Glib::Timeout->add(1000, \&handler, $data);
Gtk2->main;

sub handler {
    my ($data) = @_;
    print "timed out ... @_\n";
    # return 1 if you want the handler to be called again later
    # return 0 to stop the handler from being called again
    return 1;
}
__END__