MooseX::Log::Syslog::Fast - A Logging role for Moose on Log::Syslog::Fast
{
package ExampleLog;
use FindBin qw($Bin);
use lib "$Bin/lib";
use Moose;
with 'MooseX::Log::Syslog::Fast';
sub BUILD {
my $self = shift;
$self->_hostname('/var/run/syslog');
$self->_name('Example');
}
sub test {
my $self = shift;
$self->log('foo');
}
}
my $obj = new ExampleLog;
$obj->test;
A logging role building a very lightweight wrapper to Log::Syslog::Fast for use with Moose classes.
Log::Syslog::Fast, Log::Syslog, Moose
Please report any bugs or feature requests to bug-moosex-log-syslog-fast@rt.cpan.org, or through the web interface at http://rt.cpan.org.
Or come bother us in #moose on irc.perl.org.
Thiago Rondon <thiago@aware.com.br>
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Вы можете оставить комментарий после Вход в систему
Неприемлемый контент может быть отображен здесь и не будет показан на странице. Вы можете проверить и изменить его с помощью соответствующей функции редактирования.
Если вы подтверждаете, что содержание не содержит непристойной лексики/перенаправления на рекламу/насилия/вульгарной порнографии/нарушений/пиратства/ложного/незначительного или незаконного контента, связанного с национальными законами и предписаниями, вы можете нажать «Отправить» для подачи апелляции, и мы обработаем ее как можно скорее.
Опубликовать ( 0 )