sub oogle {
        my $self = shift;
        $self -> {oogle} = shift;
        # Mark it as very, very, very, do not touch at all private:  
        $self -> {_________________furble} ++;
    }