my $point = Wx::Point->new; $point->Set(x=>5); $point->Set(y=>5);