CPAN RT

This takes an object,
and looks up the related_accessors; 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.