<%args> $object <%doc> =head2 view_related This takes an object, and looks up the C; this should give a list of accessors that can be called to get a list of related objects. It then displays a title for that accessor, (i.e. "Beers" for a brewery) calls the accesor, and displays a list of the results. =cut %foreach my $accessor (@{$classmetadata->{related_accessors}}) {

<%ucfirst($accessor)%>

%}