- or download this
package Eertree;
...
1;
- or download this
my $s = join "", map chr(ord('a') + int rand 26), 1 .. 200;
cmpthese(-3, {
...
eertree 651/s 140% -- -84%
ee 3964/s 1362% 509% --
- or download this
cmpthese(-3, {
eertree => sub { 'String::Eertree'->new(string => $s) },
...
Rate eertree ee
eertree 648/s -- -80%
ee 3199/s 394% --
- or download this
+
2.5 +-------------------------------------------------+
...
);
$chart-> plot2d( @datasets );