The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Bencher::Scenario::LogGer::NullOutput - Benchmark Log::ger logging speed with the default/null output

VERSION

This document describes version 0.015 of Bencher::Scenario::LogGer::NullOutput (from Perl distribution Bencher-Scenarios-LogGer), released on 2019-09-18.

SYNOPSIS

To run benchmark with default option:

 % bencher -m LogGer::NullOutput

For more options (dump scenario, list/include/exclude/add participants, list/include/exclude/add datasets, etc), see bencher or run bencher --help.

DESCRIPTION

Packaging a benchmark script as a Bencher scenario makes it convenient to include/exclude/add participants/datasets (either via CLI or Perl code), send the result to a central repository, among others . See Bencher and bencher (CLI) for more details.

BENCHMARKED MODULES

Version numbers shown below are the versions used when running the sample benchmark.

Log::Any 1.705

Log::Contextual 0.008001

Log::Contextual::SimpleLogger 0.008001

Log::Dispatch 2.67

Log::Dispatch::Null 2.67

Log::Dispatchouli 2.015

Log::Fast v2.0.1

Log::Log4perl 1.49

Log::Log4perl::Tiny 1.4.0

Log::ger 0.028

Log::ger::Plugin::MultilevelLog 0.028

Log::ger::Plugin::OptAway 0.006

Mojo::Log

BENCHMARK PARTICIPANTS

  • Log::ger-100k_log_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::ger -e for(1..100_000) { log_trace(q[]) }
  • Log::ger-100k_log_is_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::ger -e for(1..100_000) { log_is_trace() }
  • Log::ger+LGP:OptAway-100k_log_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::ger::Plugin=OptAway -MLog::ger -e for(1..100_000) { log_trace(q[]) }
  • Log::ger+LGP:MutilevelLog-100k_log_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::ger::Plugin=MultilevelLog -MLog::ger -e for(1..100_000) { log("trace", q[]) }
  • Log::ger+LGP:MutilevelLog-100k_log_6 (command)

    Command line:

     #TEMPLATE: #perl -MLog::ger::Plugin=MultilevelLog -MLog::ger -e for(1..100_000) { log(6, q[]) }
  • Log::Fast-100k_DEBUG (command)

    Command line:

     #TEMPLATE: #perl -MLog::Fast -e $LOG = Log::Fast->global; $LOG->level("INFO"); for(1..100_000) { $LOG->DEBUG(q()) }
  • Log::Fast-100k_is_debug (command)

    Command line:

     #TEMPLATE: #perl -MLog::Fast -e $LOG = Log::Fast->global; for(1..100_000) { $LOG->level() eq "DEBUG" }
  • Log::Any-no_adapter-100k_log_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Any -e my $log = Log::Any->get_logger; for(1..100_000) { $log->trace(q[]) }
  • Log::Any-no_adapter-100k_is_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Any -e my $log = Log::Any->get_logger; for(1..100_000) { $log->is_trace }
  • Log::Any-null_adapter-100k_log_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Any -MLog::Any::Adapter -e Log::Any::Adapter->set(q[Null]); my $log = Log::Any->get_logger; for(1..100_000) { $log->trace(q[]) }
  • Log::Any-null_adapter-100k_is_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Any -MLog::Any::Adapter -e Log::Any::Adapter->set(q[Null]); my $log = Log::Any->get_logger; for(1..100_000) { $log->is_trace }
  • Log::Dispatch::Null-100k_debug (command)

    Command line:

     #TEMPLATE: #perl -MLog::Dispatch -e my $null = Log::Dispatch->new(outputs=>[["Null", min_level=>"debug"]]); for(1..100_000) { $null->debug("") }
  • Log::Log4perl-easy-100k_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Log4perl=:easy -e Log::Log4perl->easy_init($ERROR); for(1..100_000) { TRACE "" }
  • Log::Log4perl::Tiny-100k_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Log4perl::Tiny=:easy -e for(1..100_000) { TRACE "" }
  • Log::Contextual+Log4perl-100k_trace (command)

    Command line:

     #TEMPLATE: #perl -e use Log::Contextual ":log", "set_logger"; use Log::Log4perl ":easy"; Log::Log4perl->easy_init($DEBUG); my $logger = Log::Log4perl->get_logger; set_logger $logger; for(1..100_000) { log_trace {} }
  • Log::Contextual+SimpleLogger-100k_trace (command)

    Command line:

     #TEMPLATE: #perl -MLog::Contextual::SimpleLogger -e use Log::Contextual ":log", -logger=>Log::Contextual::SimpleLogger->new({levels=>["debug"]}); for(1..100_000) { log_trace {} }
  • Log::Dispatchouli-100k_debug (command)

    Command line:

     #TEMPLATE: #perl -MLog::Dispatchouli -e $logger = Log::Dispatchouli->new({ident=>"ident", facility=>"facility", to_stdout=>1, debug=>0}); for(1..100_000) { $logger->log_debug("") }
  • Mojo::Log-100k_debug (command)

    Command line:

     #TEMPLATE: #perl -MMojo::Log -e $log = Mojo::Log->new(level=>"warn"); for(1..100_000) { $log->debug("") }

SAMPLE BENCHMARK RESULTS

Run on: perl: v5.26.1, CPU: Intel(R) Core(TM) M-5Y71 CPU @ 1.20GHz (2 cores), OS: GNU/Linux LinuxMint version 18.3, OS kernel: Linux version 4.10.0-38-generic.

Benchmark with default options (bencher -m LogGer::NullOutput):

 #table1#
 +------------------------------------------+-----------+-------+------------+-----------+---------+
 | participant                              | rate (/s) |  time | vs_slowest |  errors   | samples |
 +------------------------------------------+-----------+-------+------------+-----------+---------+
 | Log::Dispatch::Null-100k_debug           |       0.5 | 2     |        1   |   0.096   |       6 |
 | Log::Contextual+Log4perl-100k_trace      |       2   | 0.6   |        4   |   0.009   |       7 |
 | Log::Contextual+SimpleLogger-100k_trace  |       1.9 | 0.53  |        4.1 |   0.0045  |       6 |
 | Mojo::Log-100k_debug                     |       3.6 | 0.28  |        7.9 |   0.0023  |       6 |
 | Log::Dispatchouli-100k_debug             |       6   | 0.2   |       10   |   0.0024  |       8 |
 | Log::Log4perl::Tiny-100k_trace           |       7   | 0.1   |       20   |   0.0051  |       6 |
 | Log::Any-null_adapter-100k_log_trace     |      14   | 0.07  |       31   |   0.00013 |       6 |
 | Log::Fast-100k_is_debug                  |      14   | 0.069 |       32   |   0.00018 |       6 |
 | Log::Log4perl-easy-100k_trace            |      17   | 0.058 |       38   |   0.0002  |       7 |
 | Log::Any-null_adapter-100k_is_trace      |      20   | 0.05  |       40   |   0.00074 |       7 |
 | Log::Any-no_adapter-100k_is_trace        |      21   | 0.048 |       46   |   0.00028 |       7 |
 | Log::Fast-100k_DEBUG                     |      20   | 0.04  |       50   |   0.00076 |       6 |
 | Log::Any-no_adapter-100k_log_trace       |      38   | 0.026 |       85   |   0.0002  |       6 |
 | Log::ger+LGP:OptAway-100k_log_trace      |      49   | 0.02  |      110   | 5.1e-05   |       6 |
 | Log::ger+LGP:MutilevelLog-100k_log_trace |      50   | 0.02  |      110   | 2.2e-05   |       6 |
 | Log::ger+LGP:MutilevelLog-100k_log_6     |      50   | 0.02  |      110   | 3.2e-05   |       6 |
 | Log::ger-100k_log_is_trace               |      70   | 0.02  |      100   |   0.00055 |       7 |
 | Log::ger-100k_log_trace                  |      67   | 0.015 |      150   |   0.00014 |       6 |
 +------------------------------------------+-----------+-------+------------+-----------+---------+

To display as an interactive HTML table on a browser, you can add option --format html+datatables.

HOMEPAGE

Please visit the project's homepage at https://metacpan.org/release/Bencher-Scenarios-LogGer.

SOURCE

Source repository is at https://github.com/perlancar/perl-Bencher-Scenarios-LogGer.

BUGS

Please report any bugs or feature requests on the bugtracker website https://rt.cpan.org/Public/Dist/Display.html?Name=Bencher-Scenarios-LogGer

When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.

AUTHOR

perlancar <perlancar@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2019, 2017 by perlancar@cpan.org.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.