Perl: Централизованный вызов классов и методов. Из одного отдельно взятого класса.

нашел в коде своего велосипеда такое:
$requestParams->param( search_term => $self->queryObject->searchTerm )
if $self->queryObject->searchTerm;

работает без autoload

очень удобна такая схема (молчу про modern perl):
use base qw( Class::Base Class::Accessor::Fast );
__PACKAGE__->mk_ro_accessors( qw( searchTerm ) );