Select Code to Download

  my $LoggerClass = $self->logger_class();

sub logger_class
{
  ref(shift) . '::Debug';
}

sub logger_class
{
...
  # done - return it.
  $self->{__PACKAGE__ . ':logger_class'};
}

# in some other package...
sub logger_class
...
  my $self = shift;
  $self->SUPER::logger_class('Some::Shared::Package::Debug');
}