my ($self, $level, $message) = @_;
$self->_write(level2string($level), $message) if (($self->{"level"} | $global_level) & $level || !$level);
}
my ($self, $level, $message) = @_;
$self->_write(level2string($level), $message) if (($self->{"level"} | $global_level) & $level || !$level);
}