- or download this
if( $value->isa( "Node" ) ) {
# It's okay to put $value into the parent attribute
}
- or download this
$obj->parent( 0 );
is( $obj->parent, undef );
- or download this
if( ref( $value ) && ref( $value ) ne "SCALAR" && ref( $value ) ne "AR
+RAY" && ref( $value ) ne "HASH" && $value->isa( "Node" ) ) {