#active:
push @{$object->{related}}, $object2;

#inactive
@{$object->{related}}, \$object2;

##</code><code>##

[% FOREACH related_obj = object.related %]
...
[% END %]

##</code><code>##

[% IF object.related.isActive( related_obj ) %]...[% END %]