Select Code to Download

package Node;

...
    }
    return $self;
}

use Node;

my ( $child, $parent ) = ( new Node, new Node );
$child->parent($parent);