package MyFramework::DB;

  package MyWebapp::DB;
  our @ISA= ( MyWebapp , MyFramework::DB );

  package MyOtherWebapp::DB;
  our @ISA= ( MyOtherWebapp , MyFramework::DB );

##</code><code>##

  my @_isa_parts=split '::' ref($self );
  my $LoggerClass= $_isa_parts . "::Debug";