# Increase value value of $Log::Log4perl::caller_depth by one
$Log::Log4perl::caller_depth++;  # NO NO NO!!!

##</code><code>##

  # Set value of $Log::Log4perl::caller_depth to one. Since Log4perl's
  # logger is a static object, the value must not be increased more
  # than once.
  $Log::Log4perl::caller_depth = 1;