NAME

Bencher::Scenario::FileWriteRotate::Writing - Benchmark writing using File::Write::Rotate

VERSION

This document describes version 0.002 of Bencher::Scenario::FileWriteRotate::Writing (from Perl distribution Bencher-Scenarios-FileWriteRotate), released on 2017-01-25.

SYNOPSIS

To run benchmark with default option:

 % bencher -m FileWriteRotate::Writing

To run module startup overhead benchmark:

 % bencher --module-startup -m FileWriteRotate::Writing

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.

File::Write::Rotate 0.31

BENCHMARK PARTICIPANTS

• fwr (perl_code)

  Code template:

   state $tempdir = File::Temp::tempdir(CLEANUP => 1);
   state $fwr = File::Write::Rotate->new(dir => $tempdir, prefix=>'fwr');
   $fwr->write(<str>) for 1..1000;

• fwr(lock_mode=none) (perl_code)

  Code template:

   state $tempdir = File::Temp::tempdir(CLEANUP => 1);
   state $fwr = File::Write::Rotate->new(dir => $tempdir, prefix=>'fwr', lock_mode=>'none');
   $fwr->write(<str>) for 1..1000;

• fwr(lock_mode=exclusive) (perl_code)

  Code template:

   state $tempdir = File::Temp::tempdir(CLEANUP => 1);
   state $fwr = File::Write::Rotate->new(dir => $tempdir, prefix=>'fwr', lock_mode=>'exclusive');
   $fwr->write(<str>) for 1..1000;

• fwr(rotate_probability=0.1) (perl_code)

  Code template:

   state $tempdir = File::Temp::tempdir(CLEANUP => 1);
   state $fwr = File::Write::Rotate->new(dir => $tempdir, prefix=>'fwr', rotate_probability=>0.1);
   $fwr->write(<str>) for 1..1000;

• normal (perl_code)

  Code template:

   state $tempdir = File::Temp::tempdir(CLEANUP => 1);
   state $fh = do { open my $fh, ">", "$tempdir/nf"; $fh };
   print { $fh } <str> for 1..1000;

BENCHMARK DATASETS

• 1k x 100b

SAMPLE BENCHMARK RESULTS

Run on: perl: v5.24.0, CPU: Intel(R) Core(TM) M-5Y71 CPU @ 1.20GHz (2 cores), OS: GNU/Linux LinuxMint version 17.3, OS kernel: Linux version 3.19.0-32-generic.

Benchmark with default options (bencher -m FileWriteRotate::Writing):

 #table1#
 +-----------------------------+-----------+-----------+------------+-----------+---------+
 | participant                 | rate (/s) | time (ms) | vs_slowest |  errors   | samples |
 +-----------------------------+-----------+-----------+------------+-----------+---------+
 | fwr                         |        19 |     53    |        1   | 8.4e-05   |       6 |
 | fwr(rotate_probability=0.1) |        24 |     42    |        1.3 | 6.8e-05   |       6 |
 | fwr(lock_mode=exclusive)    |        80 |     10    |        4   |   0.00014 |       7 |
 | fwr(lock_mode=none)         |        79 |     13    |        4.2 | 6.2e-05   |       6 |
 | normal                      |      7900 |      0.13 |      420   | 3.9e-07   |       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-FileWriteRotate.

SOURCE

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

BUGS

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

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.

SEE ALSO

AUTHOR

perlancar <perlancar@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 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.

cpanm Bencher::Scenarios::FileWriteRotate

perl -MCPAN -e shell
install Bencher::Scenarios::FileWriteRotate