view release on metacpan or  search on metacpan

xt/lib/ATWDumbbench.pm  view on Meta::CPAN

        my $result     = $instance->result;
        my $result_str = Dumbbench::unscientific_notation($result);

        my $mean  = $result->raw_number;
        my $sigma = $result->raw_error->[0];
        my $name  = $instance->_name_prefix;

        $self->{atw_measure_map}->{ $instance->name } = $result->number;

        $formatted .= sprintf(
            "%sRan %u iterations (%u outliers).\n",
            $name,
            scalar( @{ $instance->timings } ),
            scalar( @{ $instance->timings } ) - $result->nsamples
        );

        $formatted .=
          sprintf( "%sRounded run time per iteration: %s (%.1f%%)\n",
            $name, $result_str, $sigma / $mean * 100 );
    }