for my $v ( values %{ $self->{globals}->{memory} } ) {
                my $item = NoSQL::PL2SQL::Object::item( $v->[0] ) ;
                delete $item->[1]->{clone} if $item && $item->[1] ;  ## ERROR IS HERE
                }


##</code><code>##

Scalar::Util::weaken( $self->{globals}->{memory}->{$k}->[0] ) ;