#!/usr/bin/env perl
# FILENAME: runbench.pl
# CREATED: 09/13/14 02:18:27 by Kent Fredric (kentnl) <kentfredric@gmail.com>
# ABSTRACT: Run benchmarks
use strict;
use utf8;
$ENV{KEY_SIZE} = 256;
$ENV{VALUE_SIZE} = 256;
$ENV{TEST_MAX} = 100;
for my $test ( 0 .. 8 ) {
for ( 0 .. 50 ) {
$ENV{TEST_ID} = $test;
system( $^X, 'bench/id_bench.pl' ) == 0 or die;
}
}