Select Code to Download

  #!/usr/bin/perl -w
  use Benchmark;
...
               Rate    space nonspace
  space     32880/s       --     -89%
  nonspace 300755/s     815%       --