Bencher-ScenarioBundle-Log-ger

 view release on metacpan or  search on metacpan

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


=item * use Mojo::Log; (perl_code)

Code template:

 use Mojo::Log;



=item * use Mojo::Log; my $log=Mojo::Log->new(level=>"warn") (perl_code)

Code template:

 use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")



=item * use XLog; (perl_code)

Code template:

 use XLog;



=back

=head1 BENCHMARK SAMPLE RESULTS

=head2 Sample benchmark #1

Run on: perl: I<< v5.38.2 >>, 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;                                                   |    140    |             133.13 |                 0.00% |              1915.30% |   0.00015 |      20 |
 | use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")             |    138    |             131.13 |                 0.50% |              1905.28% | 7.8e-05   |      20 |
 | use Log::Dispatchouli;                                           |     87.6  |              80.73 |                58.05% |              1175.08% | 4.4e-05   |      20 |
 | use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu |     80.6  |              73.73 |                71.86% |              1072.63% | 2.6e-05   |      20 |
 | use Log::Dispatch;                                               |     75.8  |              68.93 |                82.77% |              1002.64% | 6.2e-05   |      20 |
 | use Log::Contextual qw(:log);                                    |     71.8  |              64.93 |                92.85% |               945.00% | 4.6e-05   |      20 |
 | use Log::Log4perl;                                               |     36.3  |              29.43 |               282.12% |               427.40% | 2.2e-05   |      20 |
 | use Log::ger::App; use Log::ger;                                 |     34    |              27.13 |               307.76% |               394.24% | 1.2e-05   |      20 |
 | use XLog;                                                        |     24.8  |              17.93 |               458.87% |               260.61% |   8e-06   |      20 |
 | use Log::ger::App;                                               |     24.7  |              17.83 |               460.82% |               259.35% | 1.7e-05   |      21 |
 | use Log::Log4perl::Tiny;                                         |     19.8  |              12.93 |               599.98% |               187.91% | 1.3e-05   |      20 |
 | use Log::ger::Like::Log4perl;                                    |     17.8  |              10.93 |               679.80% |               158.44% | 1.3e-05   |      21 |
 | use Log::Any q($log);                                            |     14.9  |               8.03 |               826.79% |               117.45% |   1e-05   |      20 |
 | use Log::Any;                                                    |     14.4  |               7.53 |               861.11% |               109.68% | 5.3e-06   |      20 |
 | use Log::ger::Output::Composite;                                 |     13.2  |               6.33 |               949.29% |                92.06% | 9.5e-06   |      20 |
 | use Log::ger::Output::Screen;                                    |     12.6  |               5.73 |               996.31% |                83.83% | 8.3e-06   |      20 |
 | use Log::ger::Plugin::OptAway; use Log::ger;                     |     10.1  |               3.23 |              1276.61% |                46.40% | 6.8e-06   |      20 |
 | use warnings;                                                    |      9.2  |               2.33 |              1404.76% |                33.93% |   4e-05   |      20 |
 | use strict; use warnings;                                        |      9.14 |               2.27 |              1415.55% |                32.98% | 7.5e-06   |      20 |
 | use Log::ger::Like::LogAny;                                      |      7.88 |               1.01 |              1657.78% |                14.65% | 3.1e-06   |      20 |
 | use Log::ger; Log::ger->get_logger;                              |      7.74 |               0.87 |              1689.83% |                12.60% | 3.1e-06   |      21 |
 | use Log::ger;                                                    |      7.69 |               0.82 |              1701.58% |                11.86% | 4.1e-06   |      20 |
 | use Log::ger ();                                                 |      7.62 |               0.75 |              1717.49% |                10.88% |   3e-06   |      20 |
 | use strict;                                                      |      7.32 |               0.45 |              1792.74% |                 6.48% | 6.1e-06   |      20 |
 | perl -e1 (baseline)                                              |      6.87 |               0    |              1915.30% |                 0.00% | 2.9e-06   |      22 |
 +------------------------------------------------------------------+-----------+--------------------+-----------------------+-----------------------+-----------+---------+


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

                                                                       Rate  use Mojo::Log;  use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")  use Log::Dispatchouli;  use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu  use Log::Disp...
  use Mojo::Log;                                                      7.1/s              --                                                   -1%                    -37%                                                              -42%               ...
  use Mojo::Log; my $log=Mojo::Log->new(level=>"warn")                7.2/s              1%                                                    --                    -36%                                                              -41%               ...
  use Log::Dispatchouli;                                             11.4/s             59%                                                   57%                      --                                                               -7%               ...
  use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu   12.4/s             73%                                                   71%                      8%                                                                --               ...
  use Log::Dispatch;                                                 13.2/s             84%                                                   82%                     15%                                                                6%               ...
  use Log::Contextual qw(:log);                                      13.9/s             94%                                                   92%                     22%                                                               12%               ...
  use Log::Log4perl;                                                 27.5/s            285%                                                  280%                    141%                                                              122%               ...
  use Log::ger::App; use Log::ger;                                   29.4/s            311%                                                  305%                    157%                                                              137%               ...
  use XLog;                                                          40.3/s            464%                                                  456%                    253%                                                              224%               ...
  use Log::ger::App;                                                 40.5/s            466%                                                  458%                    254%                                                              226%               ...
  use Log::Log4perl::Tiny;                                           50.5/s            607%                                                  596%                    342%                                                              307%               ...
  use Log::ger::Like::Log4perl;                                      56.2/s            686%                                                  675%                    392%                                                              352%               ...
  use Log::Any q($log);                                              67.1/s            839%                                                  826%                    487%                                                              440%               ...
  use Log::Any;                                                      69.4/s            872%                                                  858%                    508%                                                              459%               ...
  use Log::ger::Output::Composite;                                   75.8/s            960%                                                  945%                    563%                                                              510%               ...
  use Log::ger::Output::Screen;                                      79.4/s           1011%                                                  995%                    595%                                                              539%               ...
  use Log::ger::Plugin::OptAway; use Log::ger;                       99.0/s           1286%                                                 1266%                    767%                                                              698%               ...
  use warnings;                                                     108.7/s           1421%                                                 1400%                    852%                                                              776%               ...
  use strict; use warnings;                                         109.4/s           1431%                                                 1409%                    858%                                                              781%               ...
  use Log::ger::Like::LogAny;                                       126.9/s           1676%                                                 1651%                   1011%                                                              922%               ...
  use Log::ger; Log::ger->get_logger;                               129.2/s           1708%                                                 1682%                   1031%                                                              941%               ...
  use Log::ger;                                                     130.0/s           1720%                                                 1694%                   1039%                                                              948%               ...
  use Log::ger ();                                                  131.2/s           1737%                                                 1711%                   1049%                                                              957%               ...
  use strict;                                                       136.6/s           1812%                                                 1785%                   1096%                                                             1001%               ...
  perl -e1 (baseline)                                               145.6/s           1937%                                                 1908%                   1175%                                                             1073%               ...
 
 Legends:
   perl -e1 (baseline): code_overhead_time=0 participant=perl -e1 (baseline)
   use Log::Any q($log);: code_overhead_time=8.03 participant=use Log::Any q($log);
   use Log::Any;: code_overhead_time=7.53 participant=use Log::Any;
   use Log::Contextual qw(:log);: code_overhead_time=64.93 participant=use Log::Contextual qw(:log);
   use Log::Dispatch;: code_overhead_time=68.93 participant=use Log::Dispatch;
   use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu: code_overhead_time=73.73 participant=use Log::Dispatch; my $null = Log::Dispatch->new(outputs=>[ ["Nu
   use Log::Dispatchouli;: code_overhead_time=80.73 participant=use Log::Dispatchouli;
   use Log::Log4perl::Tiny;: code_overhead_time=12.93 participant=use Log::Log4perl::Tiny;
   use Log::Log4perl;: code_overhead_time=29.43 participant=use Log::Log4perl;
   use Log::ger ();: code_overhead_time=0.75 participant=use Log::ger ();
   use Log::ger::App;: code_overhead_time=17.83 participant=use Log::ger::App;
   use Log::ger::App; use Log::ger;: code_overhead_time=27.13 participant=use Log::ger::App; use Log::ger;
   use Log::ger::Like::Log4perl;: code_overhead_time=10.93 participant=use Log::ger::Like::Log4perl;
   use Log::ger::Like::LogAny;: code_overhead_time=1.01 participant=use Log::ger::Like::LogAny;
   use Log::ger::Output::Composite;: code_overhead_time=6.33 participant=use Log::ger::Output::Composite;
   use Log::ger::Output::Screen;: code_overhead_time=5.73 participant=use Log::ger::Output::Screen;
   use Log::ger::Plugin::OptAway; use Log::ger;: code_overhead_time=3.23 participant=use Log::ger::Plugin::OptAway; use Log::ger;
   use Log::ger;: code_overhead_time=0.82 participant=use Log::ger;
   use Log::ger; Log::ger->get_logger;: code_overhead_time=0.87 participant=use Log::ger; Log::ger->get_logger;
   use Mojo::Log;: code_overhead_time=133.13 participant=use Mojo::Log;



( run in 2.026 seconds using v1.01-cache-2.11-cpan-0bb4e1dffa6 )