Select Code to Download

#!/usr/bin/perl
use warnings;
...
           str       => sub { str($bits)       },
         }
);

1..5
ok 1 - double negation
...
long        217/s    66040%       35%        --      -18%      -45%
classic     263/s    80093%       64%       21%        --      -33%
str         394/s   119839%      145%       81%       50%        --