Implementação Log4j para Perl
