package TestClass;
use ConfClass;

sub new {
    my $self = {};
    bless $self;
    $self->conf(ConfClass->new());
}

sub conf {
    my ($self, $conf) = @_;
    $self->{'_CONF'} = $conf if $conf;
    return $self->{'_CONF'};
}