IPTables-IPv4-DBTarpit

 view release on metacpan or  search on metacpan

extradocs/bdb.tunning.txt  view on Meta::CPAN

      'berkeley read' => sub {
        my $v;
        for (0..1000) {
      $db_obj->db_get($_, $v);
        }
      },
           });

  This gives the following results:

  Benchmark: timing 50 iterations of berkeley write, file print, file sy

  +swrite, file write...
  berkeley write:  5 wallclock secs ( 5.17 usr +  0.02 sys =  5.19 CPU)  +@  9.63/s (n=50)
  file print:	  10 wallclock secs ( 4.38 usr +  4.00 sys =  8.38 CPU) @  5.97/s (n=50)
  file syswrite: 11 wallclock secs ( 4.35 usr +  4.08 sys =  8.43 CPU) @  5.93/s (n=50)
  file write: 10 wallclock secs ( 4.37 usr +  4.26 sys =  8.63 CPU) @  5.79/s (n=50)

                   Rate     file write file syswrite     file print berkeley write
  file write     5.79/s             --           -2%            -3%      -40%
  file syswrite  5.93/s             2%            --            -1%      -38%
  file print     5.97/s             3%            1%             --      -38%
  berkeley write 9.63/s            66%           62%            61%        --

  Benchmark: timing 100 iterations of berkeley read, file read, file slurp, file sysread...

  berkeley read:  4 wallclock secs ( 3.72 usr +  0.03 sys =  3.75 CPU) @ 26.67/s (n=100)
   file read:  	5 wallclock secs ( 2.71 usr +  2.01 sys =  4.72 CPU) @ 21.19/s (n=100)
  file slurp:  	6 wallclock secs ( 3.88 usr +  2.03 sys =  5.91 CPU) @ 16.92/s (n=100)
  file sysread: 4 wallclock secs ( 2.49 usr +  1.91 sys =  4.40 CPU) @ 22.73/s (n=100)

                  Rate    file slurp     file read  file sysread berkeley read

  file slurp    16.9/s            --          -20%          -26%  -37%
  file read     21.2/s           25%            --           -7%  -21%



( run in 0.494 second using v1.01-cache-2.11-cpan-71847e10f99 )