Select Code to Download

#!/usr/bin/perl -w
use strict;
...
    }
    print DATA "$string\n";
}

#!/usr/bin/perl -w
use strict;
...

  return result;
}

Benchmark: timing 150 iterations of Br_Uk-1, Br_Uk-2, Br_Uk-3, Br_Uk-4
+, Br_Uk-5, Coruscate, L~R, OM_Zen, hgolan30, merlyn, pfaut, rob_au, t
+all_man...
   Br_Uk-1: 72 wallclock secs (71.99 usr +  0.03 sys = 72.02 CPU) @  2
+.08/s (n=150)
...
Br_Uk-2    3.55/s     450%   151%      142%     128%   82%    79%     
+70%     13%    13%      5%      --     -3%   -98%
Br_Uk-3    3.66/s     468%   159%      150%     136%   88%    85%     
+76%     17%    17%      9%      3%      --   -98%
merlyn      153/s   23630% 10715%    10365%    9752% 7743%  7623%   72
+49%   4796%  4790%   4439%   4217%   4081%     --