NAME
Bencher::Scenario::LogGer::NullOutput - Benchmark Log::ger logging speed with the default/null output
VERSION
This document describes version 0.016 of Bencher::Scenario::LogGer::NullOutput (from Perl distribution Bencher-Scenarios-LogGer), released on 2020-01-13.
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.707
Log::Contextual 0.008001
Log::Contextual::SimpleLogger 0.008001
Log::Dispatch 2.68
Log::Dispatch::Null 2.68
Log::Dispatchouli 2.019
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
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.30.0, CPU: Intel(R) Core(TM) i5-7200U CPU @ 2.50GHz (2 cores), OS: GNU/Linux Ubuntu version 19.04, OS kernel: Linux version 5.0.0-37-generic.
Benchmark with default options (bencher -m LogGer::NullOutput
):
#table1#
+------------------------------------------+-----------+-----------+-----------------------+-----------------------+-----------+---------+
| participant | rate (/s) | time (ms) | pct_faster_vs_slowest | pct_slower_vs_fastest | errors | samples |
+------------------------------------------+-----------+-----------+-----------------------+-----------------------+-----------+---------+
| Log::Dispatch::Null-100k_debug | 2 | 510 | 0.00% | 3860.13% | 0.0014 | 6 |
| Log::Contextual+Log4perl-100k_trace | 2.2 | 450 | 12.15% | 3430.94% | 0.0012 | 6 |
| Log::Contextual+SimpleLogger-100k_trace | 2.3 | 440 | 15.55% | 3327.19% | 0.0014 | 6 |
| Log::Dispatchouli-100k_debug | 6.4 | 160 | 225.42% | 1116.91% | 0.00025 | 6 |
| Mojo::Log-100k_debug | 7.03 | 142 | 257.41% | 1008.01% | 6.3e-05 | 6 |
| Log::Log4perl::Tiny-100k_trace | 10.1 | 98.6 | 415.45% | 668.28% | 7e-05 | 6 |
| Log::Fast-100k_is_debug | 17 | 60 | 741.35% | 370.69% | 7.7e-05 | 6 |
| Log::Any-null_adapter-100k_log_trace | 16.7 | 59.8 | 750.22% | 365.77% | 2.3e-05 | 8 |
| Log::Log4perl-easy-100k_trace | 19 | 52 | 880.85% | 303.74% | 0.00018 | 6 |
| Log::Any-null_adapter-100k_is_trace | 24.7 | 40.5 | 1154.43% | 215.69% | 3.6e-05 | 6 |
| Log::Any-no_adapter-100k_is_trace | 25 | 40.1 | 1168.66% | 212.15% | 4.5e-06 | 6 |
| Log::Fast-100k_DEBUG | 27 | 37 | 1281.68% | 186.62% | 5.9e-05 | 6 |
| Log::Any-no_adapter-100k_log_trace | 42 | 24 | 2012.16% | 87.49% | 4.7e-05 | 6 |
| Log::ger+LGP:OptAway-100k_log_trace | 47.2 | 21.2 | 2300.93% | 64.94% | 1.8e-05 | 7 |
| Log::ger+LGP:MutilevelLog-100k_log_trace | 52.6 | 19 | 2572.82% | 48.16% | 1.7e-05 | 7 |
| Log::ger+LGP:MutilevelLog-100k_log_6 | 52.7 | 19 | 2579.73% | 47.78% | 4.9e-06 | 6 |
| Log::ger-100k_log_trace | 75.8 | 13.2 | 3752.06% | 2.81% | 1.1e-05 | 6 |
| Log::ger-100k_log_is_trace | 78 | 13 | 3860.13% | 0.00% | 2.8e-05 | 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) 2020, 2018, 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.