slidez

### Example 3

    use Tool::Bench;
    my $bench = Tool::Bench->new();
    my $naptime;
    $bench->add_items( true   => sub{1},
                       false  => sub{0},
                       more   => { code     => sub{sleep($naptime)},
                                   note     => 'taking a nap',
                                   buildup  => sub{$naptime = rand(10)},
                                   teardown => sub{$naptime = 1},
                                 },
                     );
    $bench->run(3);
    print $bench->report(format => 'JSON');