if ( $self->{'eof'} ) {
        $$bufref = "";
        return 0;
    };