Select Code to Download

while (my($key, $value) = each %source) { $target{$key} = $value }

cmpthese( -1, {
   grandfather => sub {
...
sleepyjay    905/s          --        -58%        -61%
ruzam       2162/s        139%          --         -8%
grandfather 2349/s        160%          9%          --