sub errstr {
    my $self = shift;
    return $self->{errstr} if Scalar::Util::blessed $self;
    return $errstr;
}