$nodelist{$NewObjectName}=$self;