Select Code to Download

#!usr/bin/perl
use strict;
...
          Rate Array While
Array 115513/s    --   -4%
While 120846/s    5%    --