sub auxdata {
	my $self = shift;
	if (wantarray) {
		# returns a list-ref
		return [ $self->auxclass->retrieve_all() ];
	} else {
		# returns an interator
		return $self->auxclass->retrieve_all();
	}
}

##</code><code>##

[% FOREACH aux = object.auxdata %]
<option value="[% aux.id %]">[% aux.name %]</option>
[% END %]

##</code><code>##

[% WHILE ax = a.auxdata.next %]
ID [% ax.id %]
[% END %]