Help for this page
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 }
Scalar::Util::weaken( $self->{globals}->{memory}->{$k}->[0] ) ;