sub Log {
  my $class = shift;
  return Log::Log4perl->get_logger( ref($class) || $class);
}