my( $x, $y ) = $obj->world_location;