Help for this page
void DESTROY(object) SV * object CODE: FreeEtkObject(object);
my $button = Etk::Button->new(); $button->LabelSet("moo"); ... my $self = shift; print $self->LabelGet(),"\n"; });