my $object = $other_object->get_object; my $result = do { use safederef; $object->possible_method; }; #### my $object = $other_object->get_object; my $result = $object ? $object->possible_method : undef; #### my $result = $other_object?->get_object?->possible_method;