sub CLONE {
                $drh = undef;
                return;
        }