sub CLOSE {
    undef $_[0];
}