Bencher-Scenarios-Log-ger

 view release on metacpan or  search on metacpan

lib/Bencher/Scenario/Log/ger/Overhead.pm  view on Meta::CPAN


=head1 BENCHMARK SAMPLE RESULTS

=head2 Sample benchmark #1

Run on: perl: I<< v5.38.0 >>, CPU: I<< Intel(R) Core(TM) i5-7200U CPU @ 2.50GHz (2 cores) >>, OS: I<< GNU/Linux Ubuntu version 20.04 >>, OS kernel: I<< Linux version 5.4.0-164-generic >>.

Benchmark command (default options):

 % bencher -m Log::ger::Overhead

Result formatted as table:

 #table1#
 +------------------------------------------------------------------+-----------+--------------------+-----------------------+-----------------------+-----------+---------+
 | participant                                                      | time (ms) | code_overhead_time | pct_faster_vs_slowest | pct_slower_vs_fastest |  errors   | samples |
 +------------------------------------------------------------------+-----------+--------------------+-----------------------+-----------------------+-----------+---------+
 | use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")             |    140    |             132.97 |                 0.00% |              1869.72% |   0.00031 |      21 |
 | use Mojo::Log;                                                   |    136    |             128.97 |                 1.43% |              1842.00% | 7.1e-05   |      20 |
 | use Log::Dispatchouli;                                           |     87.8  |              80.77 |                57.65% |              1149.39% | 6.9e-05   |      21 |
 | use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu |     80.4  |              73.37 |                72.17% |              1044.05% | 3.4e-05   |      20 |
 | use Log::Dispatch;                                               |     75.7  |              68.67 |                82.89% |               976.99% | 6.7e-05   |      20 |
 | use Log::Contextual qw(:log);                                    |     71.5  |              64.47 |                93.43% |               918.32% | 3.9e-05   |      20 |
 | use Log::Log4perl;                                               |     36.4  |              29.37 |               280.22% |               418.05% |   2e-05   |      20 |
 | use Log::ger::App; use Log::ger;                                 |     33.9  |              26.87 |               307.91% |               382.88% | 1.9e-05   |      20 |
 | use XLog;                                                        |     24.8  |              17.77 |               456.95% |               253.66% | 1.2e-05   |      20 |
 | use Log::ger::App;                                               |     24.8  |              17.77 |               458.51% |               252.67% | 1.4e-05   |      20 |
 | use Log::Log4perl::Tiny;                                         |     19.8  |              12.77 |               597.64% |               182.34% | 1.6e-05   |      20 |
 | use Log::ger::Like::Log4perl;                                    |     17.8  |              10.77 |               676.50% |               153.67% | 1.1e-05   |      20 |
 | use Log::Any q($log);                                            |     15    |               7.97 |               822.39% |               113.55% | 3.6e-06   |      20 |
 | use Log::Any;                                                    |     14.5  |               7.47 |               854.46% |               106.37% | 6.3e-06   |      20 |
 | use Log::ger::Output::Composite;                                 |     13.3  |               6.27 |               942.17% |                89.00% | 6.4e-06   |      20 |
 | use Log::ger::Output::Screen;                                    |     12.7  |               5.67 |               989.51% |                80.79% | 3.7e-06   |      20 |
 | use Log::ger::Plugin::OptAway; use Log::ger;                     |     10.1  |               3.07 |              1264.67% |                44.34% | 5.1e-06   |      20 |
 | use strict; use warnings;                                        |      9.25 |               2.22 |              1396.26% |                31.64% | 4.7e-06   |      20 |
 | use warnings;                                                    |      8.96 |               1.93 |              1445.22% |                27.47% |   4e-06   |      20 |
 | use Log::ger::Like::LogAny;                                      |      8    |               0.97 |              1628.98% |                13.92% | 2.5e-06   |      20 |
 | use Log::ger; Log::ger->get_logger;                              |      7.82 |               0.79 |              1669.18% |                11.33% | 4.1e-06   |      20 |
 | use Log::ger;                                                    |      7.82 |               0.79 |              1669.66% |                11.31% | 5.4e-06   |      20 |
 | use Log::ger ();                                                 |      7.71 |               0.68 |              1695.02% |                 9.73% | 2.7e-06   |      20 |
 | use strict;                                                      |      7.54 |               0.51 |              1736.46% |                 7.26% | 3.8e-06   |      20 |
 | perl -e1 (baseline)                                              |      7.03 |               0    |              1869.72% |                 0.00% | 5.7e-06   |      20 |
 +------------------------------------------------------------------+-----------+--------------------+-----------------------+-----------------------+-----------+---------+


The above result formatted in L<Benchmark.pm|Benchmark> style:

                                                                       Rate  use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")  use Mojo::Log;  use Log::Dispatchouli;  use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu  use Log::Disp...
  use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")                7.1/s                                                    --             -2%                    -37%                                                              -42%               ...
  use Mojo::Log;                                                      7.4/s                                                    2%              --                    -35%                                                              -40%               ...
  use Log::Dispatchouli;                                             11.4/s                                                   59%             54%                      --                                                               -8%               ...
  use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu   12.4/s                                                   74%             69%                      9%                                                                --               ...
  use Log::Dispatch;                                                 13.2/s                                                   84%             79%                     15%                                                                6%               ...
  use Log::Contextual qw(:log);                                      14.0/s                                                   95%             90%                     22%                                                               12%               ...
  use Log::Log4perl;                                                 27.5/s                                                  284%            273%                    141%                                                              120%               ...
  use Log::ger::App; use Log::ger;                                   29.5/s                                                  312%            301%                    158%                                                              137%               ...
  use XLog;                                                          40.3/s                                                  464%            448%                    254%                                                              224%               ...
  use Log::ger::App;                                                 40.3/s                                                  464%            448%                    254%                                                              224%               ...
  use Log::Log4perl::Tiny;                                           50.5/s                                                  607%            586%                    343%                                                              306%               ...
  use Log::ger::Like::Log4perl;                                      56.2/s                                                  686%            664%                    393%                                                              351%               ...
  use Log::Any q($log);                                              66.7/s                                                  833%            806%                    485%                                                              436%               ...
  use Log::Any;                                                      69.0/s                                                  865%            837%                    505%                                                              454%               ...
  use Log::ger::Output::Composite;                                   75.2/s                                                  952%            922%                    560%                                                              504%               ...
  use Log::ger::Output::Screen;                                      78.7/s                                                 1002%            970%                    591%                                                              533%               ...
  use Log::ger::Plugin::OptAway; use Log::ger;                       99.0/s                                                 1286%           1246%                    769%                                                              696%               ...
  use strict; use warnings;                                         108.1/s                                                 1413%           1370%                    849%                                                              769%               ...
  use warnings;                                                     111.6/s                                                 1462%           1417%                    879%                                                              797%               ...
  use Log::ger::Like::LogAny;                                       125.0/s                                                 1650%           1600%                    997%                                                              905%               ...
  use Log::ger; Log::ger->get_logger;                               127.9/s                                                 1690%           1639%                   1022%                                                              928%               ...
  use Log::ger;                                                     127.9/s                                                 1690%           1639%                   1022%                                                              928%               ...
  use Log::ger ();                                                  129.7/s                                                 1715%           1663%                   1038%                                                              942%               ...
  use strict;                                                       132.6/s                                                 1756%           1703%                   1064%                                                              966%               ...
  perl -e1 (baseline)                                               142.2/s                                                 1891%           1834%                   1148%                                                             1043%               ...
 
 Legends:
   perl -e1 (baseline): code_overhead_time=0 participant=perl -e1 (baseline)
   use Log::Any q($log);: code_overhead_time=7.97 participant=use Log::Any q($log);
   use Log::Any;: code_overhead_time=7.47 participant=use Log::Any;
   use Log::Contextual qw(:log);: code_overhead_time=64.47 participant=use Log::Contextual qw(:log);
   use Log::Dispatch;: code_overhead_time=68.67 participant=use Log::Dispatch;
   use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu: code_overhead_time=73.37 participant=use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu
   use Log::Dispatchouli;: code_overhead_time=80.77 participant=use Log::Dispatchouli;
   use Log::Log4perl::Tiny;: code_overhead_time=12.77 participant=use Log::Log4perl::Tiny;
   use Log::Log4perl;: code_overhead_time=29.37 participant=use Log::Log4perl;
   use Log::ger ();: code_overhead_time=0.68 participant=use Log::ger ();
   use Log::ger::App;: code_overhead_time=17.77 participant=use Log::ger::App;
   use Log::ger::App; use Log::ger;: code_overhead_time=26.87 participant=use Log::ger::App; use Log::ger;
   use Log::ger::Like::Log4perl;: code_overhead_time=10.77 participant=use Log::ger::Like::Log4perl;
   use Log::ger::Like::LogAny;: code_overhead_time=0.97 participant=use Log::ger::Like::LogAny;
   use Log::ger::Output::Composite;: code_overhead_time=6.27 participant=use Log::ger::Output::Composite;
   use Log::ger::Output::Screen;: code_overhead_time=5.67 participant=use Log::ger::Output::Screen;
   use Log::ger::Plugin::OptAway; use Log::ger;: code_overhead_time=3.07 participant=use Log::ger::Plugin::OptAway; use Log::ger;
   use Log::ger;: code_overhead_time=0.79 participant=use Log::ger;
   use Log::ger; Log::ger->get_logger;: code_overhead_time=0.79 participant=use Log::ger; Log::ger->get_logger;
   use Mojo::Log;: code_overhead_time=128.97 participant=use Mojo::Log;
   use Mojo::Log; my $log=Mojo::Log->new(level=>"warn"): code_overhead_time=132.97 participant=use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")
   use XLog;: code_overhead_time=17.77 participant=use XLog;
   use strict;: code_overhead_time=0.51 participant=use strict;
   use strict; use warnings;: code_overhead_time=2.22 participant=use strict; use warnings;
   use warnings;: code_overhead_time=1.93 participant=use warnings;

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

=head1 HOMEPAGE

Please visit the project's homepage at L<https://metacpan.org/release/Bencher-Scenarios-Log-ger>.

=head1 SOURCE

Source repository is at L<https://github.com/perlancar/perl-Bencher-Scenarios-Log-ger>.

=head1 AUTHOR

perlancar <perlancar@cpan.org>

=head1 CONTRIBUTING


To contribute, you can send patches by email/via RT, or send pull requests on
GitHub.



( run in 1.997 second using v1.01-cache-2.11-cpan-b9db842bd85 )