- Added solutions by Laurent Rosenfeld.

17 files changed, 862 insertions, 718 deletions

diff --git a/challenge-012/laurent-rosenfeld/blog.txt b/challenge-012/laurent-rosenfeld/blog.txt
new file mode 100644
index 0000000000..a473c80aab
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/blog.txt
@@ -0,0 +1 @@
+http://blogs.perl.org/users/laurent_r/2019/06/perl-weekly-challenge-12-euclids-numbers-and-directories.html
diff --git a/challenge-012/laurent-rosenfeld/perl5/ch-1.pl b/challenge-012/laurent-rosenfeld/perl5/ch-1.pl
new file mode 100644
index 0000000000..3ae706ca93
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl5/ch-1.pl
@@ -0,0 +1,49 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+use feature "say";
+use constant largest_num => 1000;
+
+sub find_primes {
+    my $num = 3;
+    my @primes = (2, 3);
+    while (1) {
+        $num += 2;     # check only odd numbers
+        last if $num > largest_num;
+        my $limit = int $num ** 0.5;
+        my $num_is_prime = 1;
+        for my $prime (@primes) {
+            last if $prime > $limit;
+            if ($num % $prime == 0) {
+                # $num evenly divided by $prime, exit the for loop
+                $num_is_prime = 0;
+                last;
+            }
+        }
+        push @primes, $num if $num_is_prime; #  Add $num to the array of primes
+    }
+    return @primes;
+}
+
+my @prime_numbers = find_primes;
+
+sub is_prime {
+    my $num = shift;
+    my $limit = 1 + int $num ** 0.5;
+    for my $p (@prime_numbers) {
+        return 1 if $p > $limit;
+        return 0 if $num % $p == 0;
+    }
+    warn "Something got wrong (primes list too small)\n";
+    return 0; # If we've reached this point, then our list of
+              # primes is too small, we don't know if the argument
+              # is prime, issue a warning and return a false
+              # value to be on the safe side of things
+}
+
+for my $i (0..20) {
+    my $euclid_1 = 1;
+    $euclid_1 *= $prime_numbers[$_] for 0..$i;
+    my $euclid = $euclid_1 + 1;
+    say $euclid and last unless is_prime $euclid;
+}
diff --git a/challenge-012/laurent-rosenfeld/perl5/ch-2.pl b/challenge-012/laurent-rosenfeld/perl5/ch-2.pl
new file mode 100644
index 0000000000..daa694a8cd
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl5/ch-2.pl
@@ -0,0 +1,22 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+use feature "say";
+
+die "This program needs a separator and at least 2 paths\n"
+    if @ARGV < 3;
+my ($separator, @paths) = @ARGV;
+chomp @paths;
+my @common_path = split $separator, shift @paths;
+for my $new_path (@paths) {
+    my @new_path_pieces = split $separator, $new_path;
+    my $min_length = @new_path_pieces < @common_path ?
+        @new_path_pieces : @common_path;
+    for my $i (0..$min_length - 1) {
+        if ($common_path[$i] ne $new_path_pieces[$i]) {
+            @common_path = @common_path[0..$i-1];
+            last;
+        }
+    }
+}
+say join $separator, @common_path;
diff --git a/challenge-012/laurent-rosenfeld/perl5/ch-2a.pl b/challenge-012/laurent-rosenfeld/perl5/ch-2a.pl
new file mode 100644
index 0000000000..23dba94fbd
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl5/ch-2a.pl
@@ -0,0 +1,24 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+use feature "say";
+use List::Util qw/reduce/;
+
+sub compare {
+    my ($sep, $p1, $p2) = @_;
+    my @path1 = split /$sep/, $p1;
+    my @path2 = split /$sep/, $p2;
+    my $min_length = @path1 < @path2 ? @path1 : @path2;
+    for my $i (0..$min_length - 1) {
+        if ($path1[$i] ne $path2[$i]) {
+            return join $sep, @path1[0..$i-1];
+        }
+    }
+    return join $sep, @path1[0..$min_length - 1];
+}
+
+die "This program needs a separator and at least 2 paths\n"
+    if @ARGV < 3;
+my ($separator, @paths) = @ARGV;
+chomp @paths;
+say reduce {compare($separator, $a, $b)} @paths;
diff --git a/challenge-012/laurent-rosenfeld/perl6/ch-1.p6 b/challenge-012/laurent-rosenfeld/perl6/ch-1.p6
new file mode 100644
index 0000000000..a3d05c6dd8
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl6/ch-1.p6
@@ -0,0 +1,5 @@
+use v6;
+
+my @primes = grep {.is-prime}, 1..*;
+my @euclids = map {1 + [*] @primes[0..$_]}, 0..*;
+say @euclids.first(not *.is-prime);
diff --git a/challenge-012/laurent-rosenfeld/perl6/ch-1a.p6 b/challenge-012/laurent-rosenfeld/perl6/ch-1a.p6
new file mode 100644
index 0000000000..c2a28313e4
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl6/ch-1a.p6
@@ -0,0 +1,4 @@
+use v6;
+
+my @primes = grep {.is-prime}, 1..*;
+say (map {1 + [*] @primes[0..$_]}, 0..*).first(not *.is-prime);
diff --git a/challenge-012/laurent-rosenfeld/perl6/ch-2.p6 b/challenge-012/laurent-rosenfeld/perl6/ch-2.p6
new file mode 100644
index 0000000000..59bd9b7d1f
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl6/ch-2.p6
@@ -0,0 +1,10 @@
+use v6;
+sub compare-paths ($a, $b) {
+    join $*sep, gather for $a.split($*sep) Z $b.split($*sep) -> ($p, $q) {
+        last unless $p eq $q;
+        take $p;
+    }
+}
+my $*sep = '/';
+my @paths = </a/b/c /a/b/c/e /a/b/c/d/e /a/b/c/f>;
+say reduce &compare-paths, @paths;
diff --git a/challenge-012/laurent-rosenfeld/perl6/ch-2a.p6 b/challenge-012/laurent-rosenfeld/perl6/ch-2a.p6
new file mode 100644
index 0000000000..8cb8a77d88
--- /dev/null
+++ b/challenge-012/laurent-rosenfeld/perl6/ch-2a.p6
@@ -0,0 +1,10 @@
+use v6;
+sub infix:<compare-paths> ($a, $b) {
+    join $*sep, gather for $a.split($*sep) Z $b.split($*sep) -> ($p, $q) {
+        last unless $p eq $q;
+        take $p;
+    }
+}
+my $*sep = '/';
+my @paths = </a/b/c /a/b/c/e /a/b/c/d/e /a/b/c/f>;
+say [compare-paths] @paths;
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 937386e15b..98850bfa39 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,40 +1,48 @@
 {
-   "chart" : {
-      "type" : "column"
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
+   "title" : {
+      "text" : "Perl Weekly Challenge - 012"
    },
    "legend" : {
       "enabled" : 0
    },
+   "chart" : {
+      "type" : "column"
+   },
    "drilldown" : {
       "series" : [
          {
+            "name" : "Aaron Sherman",
             "data" : [
                [
                   "Perl 6",
                   2
                ]
             ],
-            "id" : "Aaron Sherman",
-            "name" : "Aaron Sherman"
+            "id" : "Aaron Sherman"
          },
          {
-            "name" : "Alicia Bielsa",
-            "id" : "Alicia Bielsa",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
-            ]
+            ],
+            "id" : "Alicia Bielsa",
+            "name" : "Alicia Bielsa"
          },
          {
+            "id" : "Andrezgz",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
             ],
-            "id" : "Andrezgz",
             "name" : "Andrezgz"
          },
          {
@@ -48,24 +56,24 @@
             "name" : "Arne Sommer"
          },
          {
+            "name" : "Dave Jacoby",
             "id" : "Dave Jacoby",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
-            ],
-            "name" : "Dave Jacoby"
+            ]
          },
          {
-            "name" : "Gustavo Chaves",
-            "id" : "Gustavo Chaves",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
-            ]
+            ],
+            "id" : "Gustavo Chaves",
+            "name" : "Gustavo Chaves"
          },
          {
             "id" : "Joelle Maslak",
@@ -82,34 +90,48 @@
             "name" : "Joelle Maslak"
          },
          {
-            "id" : "Kevin Colyer",
             "data" : [
                [
                   "Perl 6",
                   2
                ]
             ],
+            "id" : "Kevin Colyer",
             "name" : "Kevin Colyer"
          },
          {
+            "name" : "Laurent Rosenfeld",
+            "id" : "Laurent Rosenfeld",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ]
+            ]
+         },
+         {
             "name" : "Ozzy",
-            "id" : "Ozzy",
             "data" : [
                [
                   "Perl 6",
                   1
                ]
-            ]
+            ],
+            "id" : "Ozzy"
          },
          {
+            "name" : "Rakesh Kumar Shardiwal",
+            "id" : "Rakesh Kumar Shardiwal",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
-            ],
-            "id" : "Rakesh Kumar Shardiwal",
-            "name" : "Rakesh Kumar Shardiwal"
+            ]
          },
          {
             "data" : [
@@ -122,52 +144,27 @@
             "name" : "Simon Proctor"
          },
          {
-            "name" : "Steven Wilson",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
             ],
-            "id" : "Steven Wilson"
+            "id" : "Steven Wilson",
+            "name" : "Steven Wilson"
          },
          {
-            "name" : "Yozen Hernandez",
             "data" : [
                [
                   "Perl 5",
                   2
                ]
             ],
-            "id" : "Yozen Hernandez"
+            "id" : "Yozen Hernandez",
+            "name" : "Yozen Hernandez"
          }
       ]
    },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Solutions"
-      }
-   },
-   "tooltip" : {
-      "followPointer" : 1,
-      "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>",
-      "pointerFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>"
-   },
-   "xAxis" : {
-      "type" : "category"
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge - 012"
-   },
-   "plotOptions" : {
-      "series" : {
-         "borderWidth" : 0,
-         "dataLabels" : {
-            "enabled" : 1,
-            "format" : "{point.y}"
-         }
-      }
-   },
    "series" : [
       {
          "colorByPoint" : 1,
@@ -175,43 +172,48 @@
          "data" : [
             {
                "drilldown" : "Aaron Sherman",
-               "name" : "Aaron Sherman",
-               "y" : 2
+               "y" : 2,
+               "name" : "Aaron Sherman"
             },
             {
+               "drilldown" : "Alicia Bielsa",
                "y" : 2,
-               "name" : "Alicia Bielsa",
-               "drilldown" : "Alicia Bielsa"
+               "name" : "Alicia Bielsa"
             },
             {
-               "drilldown" : "Andrezgz",
                "name" : "Andrezgz",
-               "y" : 2
+               "y" : 2,
+               "drilldown" : "Andrezgz"
             },
             {
-               "y" : 2,
+               "drilldown" : "Arne Sommer",
                "name" : "Arne Sommer",
-               "drilldown" : "Arne Sommer"
+               "y" : 2
             },
             {
+               "drilldown" : "Dave Jacoby",
                "y" : 2,
-               "name" : "Dave Jacoby",
-               "drilldown" : "Dave Jacoby"
+               "name" : "Dave Jacoby"
             },
             {
-               "name" : "Gustavo Chaves",
+               "drilldown" : "Gustavo Chaves",
                "y" : 2,
-               "drilldown" : "Gustavo Chaves"
+               "name" : "Gustavo Chaves"
             },
             {
-               "drilldown" : "Joelle Maslak",
+               "name" : "Joelle Maslak",
                "y" : 2,
-               "name" : "Joelle Maslak"
+               "drilldown" : "Joelle Maslak"
             },
             {
                "drilldown" : "Kevin Colyer",
-               "y" : 2,
-               "name" : "Kevin Colyer"
+               "name" : "Kevin Colyer",
+               "y" : 2
+            },
+            {
+               "drilldown" : "Laurent Rosenfeld",
+               "y" : 4,
+               "name" : "Laurent Rosenfeld"
             },
             {
                "name" : "Ozzy",
@@ -220,28 +222,45 @@
             },
             {
                "drilldown" : "Rakesh Kumar Shardiwal",
-               "name" : "Rakesh Kumar Shardiwal",
-               "y" : 2
+               "y" : 2,
+               "name" : "Rakesh Kumar Shardiwal"
             },
             {
-               "y" : 2,
                "name" : "Simon Proctor",
+               "y" : 2,
                "drilldown" : "Simon Proctor"
             },
             {
-               "y" : 2,
+               "drilldown" : "Steven Wilson",
                "name" : "Steven Wilson",
-               "drilldown" : "Steven Wilson"
+               "y" : 2
             },
             {
                "drilldown" : "Yozen Hernandez",
-               "name" : "Yozen Hernandez",
-               "y" : 2
+               "y" : 2,
+               "name" : "Yozen Hernandez"
             }
          ]
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 13] Last updated at 2019-06-13 10:22:07 GMT"
+      "text" : "[Champions: 14] Last updated at 2019-06-13 10:31:52 GMT"
+   },
+   "plotOptions" : {
+      "series" : {
+         "borderWidth" : 0,
+         "dataLabels" : {
+            "format" : "{point.y}",
+            "enabled" : 1
+         }
+      }
+   },
+   "tooltip" : {
+      "followPointer" : 1,
+      "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>",
+      "pointerFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>"
+   },
+   "xAxis" : {
+      "type" : "category"
    }
 }
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index a24bec6494..a2e6aa2297 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,63 +1,63 @@
 {
-   "title" : {
-      "text" : "Perl Weekly Challenge Contributions - 2019"
-   },
-   "subtitle" : {
-      "text" : "Last updated at 2019-06-13 10:22:13 GMT"
-   },
-   "chart" : {
-      "type" : "column"
-   },
    "yAxis" : {
       "min" : 0,
       "title" : {
          "text" : null
       }
    },
+   "xAxis" : {
+      "type" : "category",
+      "labels" : {
+         "style" : {
+            "fontSize" : "13px",
+            "fontFamily" : "Verdana, sans-serif"
+         }
+      }
+   },
+   "legend" : {
+      "enabled" : "false"
+   },
    "tooltip" : {
       "pointFormat" : "<b>{point.y:.0f}</b>"
    },
+   "chart" : {
+      "type" : "column"
+   },
    "series" : [
       {
-         "name" : "Contributions",
-         "dataLabels" : {
-            "format" : "{point.y:.0f}",
-            "color" : "#FFFFFF",
-            "rotation" : -90,
-            "y" : 10,
-            "enabled" : "true",
-            "style" : {
-               "fontFamily" : "Verdana, sans-serif",
-               "fontSize" : "13px"
-            },
-            "align" : "right"
-         },
          "data" : [
             [
                "Blog",
-               101
+               102
             ],
             [
                "Perl 5",
-               462
+               464
             ],
             [
                "Perl 6",
-               269
+               271
             ]
-         ]
+         ],
+         "dataLabels" : {
+            "enabled" : "true",
+            "format" : "{point.y:.0f}",
+            "rotation" : -90,
+            "align" : "right",
+            "style" : {
+               "fontSize" : "13px",
+               "fontFamily" : "Verdana, sans-serif"
+            },
+            "color" : "#FFFFFF",
+            "y" : 10
+         },
+         "name" : "Contributions"
       }
    ],
-   "legend" : {
-      "enabled" : "false"
+   "subtitle" : {
+      "text" : "Last updated at 2019-06-13 10:32:24 GMT"
    },
-   "xAxis" : {
-      "type" : "category",
-      "labels" : {
-         "style" : {
-            "fontSize" : "13px",
-            "fontFamily" : "Verdana, sans-serif"
-         }
-      }
+   "title" : {
+      "text" : "Perl Weekly Challenge Contributions - 2019"
    }
 }
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index c81fc2be63..41de812774 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -1,6 +1,11 @@
 {
-   "chart" : {
-      "type" : "column"
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
+   "xAxis" : {
+      "type" : "category"
    },
    "drilldown" : {
       "series" : [
@@ -19,8 +24,6 @@
             ]
          },
          {
-            "id" : "002",
-            "name" : "002",
             "data" : [
                [
                   "Perl 5",
@@ -30,9 +33,12 @@
                   "Perl 6",
                   32
                ]
-            ]
+            ],
+            "name" : "002",
+            "id" : "002"
          },
          {
+            "name" : "003",
             "id" : "003",
             "data" : [
                [
@@ -43,8 +49,7 @@
                   "Perl 6",
                   26
                ]
-            ],
-            "name" : "003"
+            ]
          },
          {
             "data" : [
@@ -62,6 +67,7 @@
          },
          {
             "id" : "005",
+            "name" : "005",
             "data" : [
                [
                   "Perl 5",
@@ -71,11 +77,9 @@
                   "Perl 6",
                   22
                ]
-            ],
-            "name" : "005"
+            ]
          },
          {
-            "name" : "006",
             "data" : [
                [
                   "Perl 5",
@@ -86,7 +90,8 @@
                   14
                ]
             ],
-            "id" : "006"
+            "id" : "006",
+            "name" : "006"
          },
          {
             "id" : "007",
@@ -104,6 +109,7 @@
          },
          {
             "id" : "008",
+            "name" : "008",
             "data" : [
                [
                   "Perl 5",
@@ -113,10 +119,11 @@
                   "Perl 6",
                   20
                ]
-            ],
-            "name" : "008"
+            ]
          },
          {
+            "id" : "009",
+            "name" : "009",
             "data" : [
                [
                   "Perl 5",
@@ -126,12 +133,11 @@
                   "Perl 6",
                   18
                ]
-            ],
-            "name" : "009",
-            "id" : "009"
+            ]
          },
          {
             "id" : "010",
+            "name" : "010",
             "data" : [
                [
                   "Perl 5",
@@ -141,8 +147,7 @@
                   "Perl 6",
                   15
                ]
-            ],
-            "name" : "010"
+            ]
          },
          {
             "id" : "011",
@@ -159,64 +164,56 @@
             ]
          },
          {
+            "id" : "012",
             "name" : "012",
             "data" : [
                [
                   "Perl 5",
-                  15
+                  17
                ],
                [
                   "Perl 6",
-                  10
+                  12
                ]
-            ],
-            "id" : "012"
+            ]
          }
       ]
    },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Solutions"
-      }
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge Language"
-   },
-   "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-06-13 10:22:13 GMT"
-   },
    "legend" : {
       "enabled" : "false"
    },
-   "xAxis" : {
-      "type" : "category"
+   "tooltip" : {
+      "followPointer" : "true",
+      "headerFormat" : "<span style=\"font-size:11px\"></span>",
+      "pointFormat" : "<span style=\"color:{point.color}\">{point.name}</span>: <b>{point.y:f}</b><br/>"
    },
    "plotOptions" : {
       "series" : {
+         "borderWidth" : 0,
          "dataLabels" : {
             "enabled" : 1,
             "format" : "{point.y}"
-         },
-         "borderWidth" : 0
+         }
       }
    },
-   "tooltip" : {
-      "pointFormat" : "<span style=\"color:{point.color}\">{point.name}</span>: <b>{point.y:f}</b><br/>",
-      "headerFormat" : "<span style=\"font-size:11px\"></span>",
-      "followPointer" : "true"
+   "chart" : {
+      "type" : "column"
+   },
+   "subtitle" : {
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-06-13 10:32:24 GMT"
    },
    "series" : [
       {
          "data" : [
             {
                "y" : 113,
-               "drilldown" : "001",
-               "name" : "#001 [P5=76 P6=37]"
+               "name" : "#001 [P5=76 P6=37]",
+               "drilldown" : "001"
             },
             {
+               "y" : 95,
                "name" : "#002 [P5=63 P6=32]",
-               "drilldown" : "002",
-               "y" : 95
+               "drilldown" : "002"
             },
             {
                "y" : 58,
@@ -224,29 +221,29 @@
                "drilldown" : "003"
             },
             {
-               "y" : 75,
                "name" : "#004 [P5=46 P6=29]",
-               "drilldown" : "004"
+               "drilldown" : "004",
+               "y" : 75
             },
             {
+               "y" : 55,
                "name" : "#005 [P5=33 P6=22]",
-               "drilldown" : "005",
-               "y" : 55
+               "drilldown" : "005"
             },
             {
+               "y" : 41,
                "drilldown" : "006",
-               "name" : "#006 [P5=27 P6=14]",
-               "y" : 41
+               "name" : "#006 [P5=27 P6=14]"
             },
             {
-               "name" : "#007 [P5=26 P6=20]",
+               "y" : 46,
                "drilldown" : "007",
-               "y" : 46
+               "name" : "#007 [P5=26 P6=20]"
             },
             {
                "y" : 58,
-               "drilldown" : "008",
-               "name" : "#008 [P5=38 P6=20]"
+               "name" : "#008 [P5=38 P6=20]",
+               "drilldown" : "008"
             },
             {
                "y" : 51,
@@ -254,23 +251,26 @@
                "drilldown" : "009"
             },
             {
+               "y" : 47,
                "drilldown" : "010",
-               "name" : "#010 [P5=32 P6=15]",
-               "y" : 47
+               "name" : "#010 [P5=32 P6=15]"
             },
             {
-               "y" : 67,
+               "name" : "#011 [P5=41 P6=26]",
                "drilldown" : "011",
-               "name" : "#011 [P5=41 P6=26]"
+               "y" : 67
             },
             {
+               "y" : 29,
                "drilldown" : "012",
-               "name" : "#012 [P5=15 P6=10]",
-               "y" : 25
+               "name" : "#012 [P5=17 P6=12]"
             }
          ],
-         "name" : "Perl Weekly Challenge Languages",
-         "colorByPoint" : "true"
+         "colorByPoint" : "true",
+         "name" : "Perl Weekly Challenge Languages"
       }
-   ]
+   ],
+   "title" : {
+      "text" : "Perl Weekly Challenge Language"
+   }
 }
diff --git a/stats/pwc-leaders.json b/stats/pwc-leaders.json
index dfedecd140..5366c1651b 100644
--- a/stats/pwc-leaders.json
+++ b/stats/pwc-leaders.json
@@ -1,128 +1,103 @@
 {
-   "xAxis" : {
-      "type" : "category"
-   },
-   "legend" : {
-      "enabled" : "false"
-   },
-   "tooltip" : {
-      "pointFormat" : "<span style=\"color:{point.color}\">{point.name}</span>: <b>{point.y:f}</b><br/>",
-      "followPointer" : "true",
-      "headerFormat" : "<span style=\"font-size:11px\"></span>"
-   },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Score"
-      }
-   },
-   "plotOptions" : {
-      "series" : {
-         "borderWidth" : 0,
-         "dataLabels" : {
-            "format" : "{point.y}",
-            "enabled" : 1
-         }
-      }
-   },
    "title" : {
       "text" : "Perl Weekly Challenge Leaders (TOP 50)"
    },
    "drilldown" : {
       "series" : [
          {
+            "name" : "Laurent Rosenfeld",
             "data" : [
                [
                   "Blog",
-                  3
+                  14
                ],
                [
-                  "Perl 6",
-                  27
+                  "Perl 5",
+                  24
                ],
                [
-                  "Perl 5",
-                  27
+                  "Perl 6",
+                  23
                ]
             ],
-            "name" : "Joelle Maslak",
-            "id" : "Joelle Maslak"
+            "id" : "Laurent Rosenfeld"
          },
          {
-            "id" : "Laurent Rosenfeld",
-            "name" : "Laurent Rosenfeld",
+            "id" : "Joelle Maslak",
+            "name" : "Joelle Maslak",
             "data" : [
                [
-                  "Blog",
-                  13
+                  "Perl 5",
+                  27
                ],
                [
                   "Perl 6",
-                  21
+                  27
                ],
                [
-                  "Perl 5",
-                  22
+                  "Blog",
+                  3
                ]
             ]
          },
          {
             "id" : "Jaldhar H. Vyas",
-            "name" : "Jaldhar H. Vyas",
             "data" : [
                [
-                  "Perl 5",
+                  "Perl 6",
                   22
                ],
                [
-                  "Perl 6",
+                  "Perl 5",
                   22
                ]
-            ]
+            ],
+            "name" : "Jaldhar H. Vyas"
          },
          {
-            "name" : "Ruben Westerberg",
+            "id" : "Ruben Westerberg",
             "data" : [
                [
-                  "Perl 6",
+                  "Perl 5",
                   19
                ],
                [
-                  "Perl 5",
+                  "Perl 6",
                   19
                ]
             ],
-            "id" : "Ruben Westerberg"
+            "name" : "Ruben Westerberg"
          },
          {
+            "name" : "Adam Russell",
             "data" : [
                [
-                  "Blog",
-                  11
-               ],
-               [
                   "Perl 5",
                   22
+               ],
+               [
+                  "Blog",
+                  11
                ]
             ],
-            "name" : "Adam Russell",
             "id" : "Adam Russell"