Merge branch 'master' of https://github.com/manwar/perlweeklychallenge-club

15 files changed, 1320 insertions, 1135 deletions

diff --git a/challenge-023/roger-bell-west/perl5/ch-1.pl b/challenge-023/roger-bell-west/perl5/ch-1.pl
new file mode 100755
index 0000000000..8c81a61d9d
--- /dev/null
+++ b/challenge-023/roger-bell-west/perl5/ch-1.pl
@@ -0,0 +1,17 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Getopt::Std;
+
+my %o=('d' => 2);
+getopts('d:',\%o);
+my @seq=@ARGV;
+
+foreach (1..$o{d}) {
+  my @o=map {$seq[$_+1]-$seq[$_]} (0..$#seq-1);
+  @seq=@o;
+}
+
+print join(' ',@seq),"\n";
diff --git a/challenge-023/roger-bell-west/perl5/ch-2.pl b/challenge-023/roger-bell-west/perl5/ch-2.pl
new file mode 100755
index 0000000000..138da57be4
--- /dev/null
+++ b/challenge-023/roger-bell-west/perl5/ch-2.pl
@@ -0,0 +1,34 @@
+#! /usr/bin/perl
+
+use strict;
+use warnings;
+
+use Math::BigInt lib => 'GMP';
+
+foreach my $i (@ARGV) {
+  my $f=primefactor(Math::BigInt->new($i));
+  my @o="$i:";
+  foreach my $ff (sort {$a <=> $b} keys %{$f}) {
+    push @o,($ff) x $f->{$ff};
+  }
+  print join(' ',@o),"\n";
+}
+
+sub primefactor {
+  my $n=shift;
+  my %out;
+  while ($n%2 == 0) {
+    $out{2}++;
+    $n/=2;
+  }
+  my $k=Math::BigInt->new(3);
+  while ($k*$k <= $n) {
+    while ($n % $k == 0) {
+      $out{$k}++;
+      $n /= $k;
+    }
+    $k+=2;
+  }
+  $out{$n}++;
+  return \%out;
+}
diff --git a/challenge-023/roger-bell-west/perl6/ch-1.p6 b/challenge-023/roger-bell-west/perl6/ch-1.p6
new file mode 100755
index 0000000000..4f0da6316f
--- /dev/null
+++ b/challenge-023/roger-bell-west/perl6/ch-1.p6
@@ -0,0 +1,11 @@
+#! /usr/bin/perl6
+
+my @seq=@*ARGS;
+my $depth=shift @seq;
+
+for (1..$depth) {
+  my @o=map {@seq[$_+1]-@seq[$_]}, (0..@seq.end-1);
+  @seq=@o;
+}
+
+say join(' ',@seq);
diff --git a/challenge-023/roger-bell-west/perl6/ch-2.p6 b/challenge-023/roger-bell-west/perl6/ch-2.p6
new file mode 100755
index 0000000000..1dad19ab17
--- /dev/null
+++ b/challenge-023/roger-bell-west/perl6/ch-2.p6
@@ -0,0 +1,29 @@
+#! /usr/bin/perl6
+
+for @*ARGS -> $i {
+  my %f=primefactor($i);
+  my @o="$i:";
+  for %f.keys.sort({$^a <=> $^b}) -> $ff {
+    push @o,($ff) xx %f{$ff};
+  }
+  say join(' ',@o);
+}
+
+sub primefactor ($nn) {
+  my $n=$nn;
+  my %out;
+  while ($n%2 == 0) {
+    %out{2}++;
+    $n/=2;
+  }
+  my $k=3;
+  while ($k*$k <= $n) {
+    while ($n % $k == 0) {
+      %out{$k}++;
+      $n /= $k;
+    }
+    $k+=2;
+  }
+  %out{$n}++;
+  return %out;
+}
diff --git a/stats/pwc-challenge-022.json b/stats/pwc-challenge-022.json
new file mode 100644
index 0000000000..3523e8bc73
--- /dev/null
+++ b/stats/pwc-challenge-022.json
@@ -0,0 +1,438 @@
+{
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
+   "legend" : {
+      "enabled" : 0
+   },
+   "subtitle" : {
+      "text" : "[Champions: 22] Last updated at 2019-08-25 23:59:57 GMT"
+   },
+   "series" : [
+      {
+         "colorByPoint" : 1,
+         "data" : [
+            {
+               "y" : 3,
+               "name" : "Adam Russell",
+               "drilldown" : "Adam Russell"
+            },
+            {
+               "y" : 1,
+               "drilldown" : "Andrezgz",
+               "name" : "Andrezgz"
+            },
+            {
+               "y" : 3,
+               "drilldown" : "Arne Sommer",
+               "name" : "Arne Sommer"
+            },
+            {
+               "y" : 4,
+               "drilldown" : "Athanasius",
+               "name" : "Athanasius"
+            },
+            {
+               "drilldown" : "Daniel Mantovani",
+               "name" : "Daniel Mantovani",
+               "y" : 1
+            },
+            {
+               "y" : 2,
+               "name" : "Duane Powell",
+               "drilldown" : "Duane Powell"
+            },
+            {
+               "y" : 2,
+               "name" : "Duncan C. White",
+               "drilldown" : "Duncan C. White"
+            },
+            {
+               "y" : 2,
+               "name" : "E. Choroba",
+               "drilldown" : "E. Choroba"
+            },
+            {
+               "drilldown" : "Guillermo Ramos",
+               "name" : "Guillermo Ramos",
+               "y" : 2
+            },
+            {
+               "y" : 5,
+               "drilldown" : "Jaldhar H. Vyas",
+               "name" : "Jaldhar H. Vyas"
+            },
+            {
+               "name" : "Joelle Maslak",
+               "drilldown" : "Joelle Maslak",
+               "y" : 4
+            },
+            {
+               "drilldown" : "Kevin Colyer",
+               "name" : "Kevin Colyer",
+               "y" : 2
+            },
+            {
+               "name" : "Kian-Meng Ang",
+               "drilldown" : "Kian-Meng Ang",
+               "y" : 1
+            },
+            {
+               "y" : 5,
+               "name" : "Laurent Rosenfeld",
+               "drilldown" : "Laurent Rosenfeld"
+            },
+            {
+               "y" : 2,
+               "name" : "Mark Senn",
+               "drilldown" : "Mark Senn"
+            },
+            {
+               "name" : "Ozzy",
+               "drilldown" : "Ozzy",
+               "y" : 1
+            },
+            {
+               "y" : 4,
+               "drilldown" : "Randy Lauen",
+               "name" : "Randy Lauen"
+            },
+            {
+               "y" : 4,
+               "name" : "Roger Bell West",
+               "drilldown" : "Roger Bell West"
+            },
+            {
+               "y" : 4,
+               "drilldown" : "Ruben Westerberg",
+               "name" : "Ruben Westerberg"
+            },
+            {
+               "drilldown" : "Simon Proctor",
+               "name" : "Simon Proctor",
+               "y" : 2
+            },
+            {
+               "name" : "Steven Wilson",
+               "drilldown" : "Steven Wilson",
+               "y" : 1
+            },
+            {
+               "y" : 5,
+               "drilldown" : "Yet Ebreo",
+               "name" : "Yet Ebreo"
+            }
+         ],
+         "name" : "Perl Weekly Challenge - 022"
+      }
+   ],
+   "drilldown" : {
+      "series" : [
+         {
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Adam Russell",
+            "id" : "Adam Russell"
+         },
+         {
+            "id" : "Andrezgz",
+            "data" : [
+               [
+                  "Perl 5",
+                  1
+               ]
+            ],
+            "name" : "Andrezgz"
+         },
+         {
+            "id" : "Arne Sommer",
+            "name" : "Arne Sommer",
+            "data" : [
+               [
+                  "Perl 6",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "id" : "Athanasius",
+            "name" : "Athanasius",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Daniel Mantovani",
+            "data" : [
+               [
+                  "Perl 5",
+                  1
+               ]
+            ],
+            "id" : "Daniel Mantovani"
+         },
+         {
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ]
+            ],
+            "name" : "Duane Powell",
+            "id" : "Duane Powell"
+         },
+         {
+            "id" : "Duncan C. White",
+            "name" : "Duncan C. White",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ]
+            ]
+         },
+         {
+            "id" : "E. Choroba",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ]
+            ],
+            "name" : "E. Choroba"
+         },
+         {
+            "name" : "Guillermo Ramos",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ]
+            ],
+            "id" : "Guillermo Ramos"
+         },
+         {
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Jaldhar H. Vyas",
+            "id" : "Jaldhar H. Vyas"
+         },
+         {
+            "name" : "Joelle Maslak",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ]
+            ],
+            "id" : "Joelle Maslak"
+         },
+         {
+            "id" : "Kevin Colyer",
+            "name" : "Kevin Colyer",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ]
+            ]
+         },
+         {
+            "data" : [
+               [
+                  "Perl 5",
+                  1
+               ]
+            ],
+            "name" : "Kian-Meng Ang",
+            "id" : "Kian-Meng Ang"
+         },
+         {
+            "id" : "Laurent Rosenfeld",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Laurent Rosenfeld"
+         },
+         {
+            "id" : "Mark Senn",
+            "data" : [
+               [
+                  "Perl 6",
+                  1
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Mark Senn"
+         },
+         {
+            "data" : [
+               [
+                  "Perl 6",
+                  1
+               ]
+            ],
+            "name" : "Ozzy",
+            "id" : "Ozzy"
+         },
+         {
+            "id" : "Randy Lauen",
+            "name" : "Randy Lauen",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ]
+            ]
+         },
+         {
+            "id" : "Roger Bell West",
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  1
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Roger Bell West"
+         },
+         {
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ]
+            ],
+            "name" : "Ruben Westerberg",
+            "id" : "Ruben Westerberg"
+         },
+         {
+            "name" : "Simon Proctor",
+            "data" : [
+               [
+                  "Perl 6",
+                  2
+               ]
+            ],
+            "id" : "Simon Proctor"
+         },
+         {
+            "id" : "Steven Wilson",
+            "name" : "Steven Wilson",
+            "data" : [
+               [
+                  "Perl 5",
+                  1
+               ]
+            ]
+         },
+         {
+            "data" : [
+               [
+                  "Perl 5",
+                  2
+               ],
+               [
+                  "Perl 6",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Yet Ebreo",
+            "id" : "Yet Ebreo"
+         }
+      ]
+   },
+   "xAxis" : {
+      "type" : "category"
+   },
+   "plotOptions" : {
+      "series" : {
+         "dataLabels" : {
+            "format" : "{point.y}",
+            "enabled" : 1
+         },
+         "borderWidth" : 0
+      }
+   },
+   "tooltip" : {
+      "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
+      "followPointer" : 1,
+      "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>"
+   },
+   "chart" : {
+      "type" : "column"
+   },
+   "title" : {
+      "text" : "Perl Weekly Challenge - 022"
+   }
+}
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 3523e8bc73..5bd6173550 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -4,130 +4,21 @@
          "text" : "Total Solutions"
       }
    },
-   "legend" : {
-      "enabled" : 0
+   "chart" : {
+      "type" : "column"
    },
-   "subtitle" : {
-      "text" : "[Champions: 22] Last updated at 2019-08-25 23:59:57 GMT"
+   "xAxis" : {
+      "type" : "category"
    },
-   "series" : [
-      {
-         "colorByPoint" : 1,
-         "data" : [
-            {
-               "y" : 3,
-               "name" : "Adam Russell",
-               "drilldown" : "Adam Russell"
-            },
-            {
-               "y" : 1,
-               "drilldown" : "Andrezgz",
-               "name" : "Andrezgz"
-            },
-            {
-               "y" : 3,
-               "drilldown" : "Arne Sommer",
-               "name" : "Arne Sommer"
-            },
-            {
-               "y" : 4,
-               "drilldown" : "Athanasius",
-               "name" : "Athanasius"
-            },
-            {
-               "drilldown" : "Daniel Mantovani",
-               "name" : "Daniel Mantovani",
-               "y" : 1
-            },
-            {
-               "y" : 2,
-               "name" : "Duane Powell",
-               "drilldown" : "Duane Powell"
-            },
-            {
-               "y" : 2,
-               "name" : "Duncan C. White",
-               "drilldown" : "Duncan C. White"
-            },
-            {
-               "y" : 2,
-               "name" : "E. Choroba",
-               "drilldown" : "E. Choroba"
-            },
-            {
-               "drilldown" : "Guillermo Ramos",
-               "name" : "Guillermo Ramos",
-               "y" : 2
-            },
-            {
-               "y" : 5,
-               "drilldown" : "Jaldhar H. Vyas",
-               "name" : "Jaldhar H. Vyas"
-            },
-            {
-               "name" : "Joelle Maslak",
-               "drilldown" : "Joelle Maslak",
-               "y" : 4
-            },
-            {
-               "drilldown" : "Kevin Colyer",
-               "name" : "Kevin Colyer",
-               "y" : 2
-            },
-            {
-               "name" : "Kian-Meng Ang",
-               "drilldown" : "Kian-Meng Ang",
-               "y" : 1
-            },
-            {
-               "y" : 5,
-               "name" : "Laurent Rosenfeld",
-               "drilldown" : "Laurent Rosenfeld"
-            },
-            {
-               "y" : 2,
-               "name" : "Mark Senn",
-               "drilldown" : "Mark Senn"
-            },
-            {
-               "name" : "Ozzy",
-               "drilldown" : "Ozzy",
-               "y" : 1
-            },
-            {
-               "y" : 4,
-               "drilldown" : "Randy Lauen",
-               "name" : "Randy Lauen"
-            },
-            {
-               "y" : 4,
-               "name" : "Roger Bell West",
-               "drilldown" : "Roger Bell West"
-            },
-            {
-               "y" : 4,
-               "drilldown" : "Ruben Westerberg",
-               "name" : "Ruben Westerberg"
-            },
-            {
-               "drilldown" : "Simon Proctor",
-               "name" : "Simon Proctor",
-               "y" : 2
-            },
-            {
-               "name" : "Steven Wilson",
-               "drilldown" : "Steven Wilson",
-               "y" : 1
-            },
-            {
-               "y" : 5,
-               "drilldown" : "Yet Ebreo",
-               "name" : "Yet Ebreo"
-            }
-         ],
-         "name" : "Perl Weekly Challenge - 022"
+   "plotOptions" : {
+      "series" : {
+         "borderWidth" : 0,
+         "dataLabels" : {
+            "format" : "{point.y}",
+            "enabled" : 1
+         }
       }
-   ],
+   },
    "drilldown" : {
       "series" : [
          {
@@ -137,302 +28,40 @@
                   2
                ],
                [
-                  "Blog",
-                  1
-               ]
-            ],
-            "name" : "Adam Russell",
-            "id" : "Adam Russell"
-         },
-         {
-            "id" : "Andrezgz",
-            "data" : [
-               [
-                  "Perl 5",
-                  1
-               ]
-            ],
-            "name" : "Andrezgz"
-         },
-         {
-            "id" : "Arne Sommer",
-            "name" : "Arne Sommer",
-            "data" : [
-               [
                   "Perl 6",
                   2
-               ],
-               [
-                  "Blog",
-                  1
-               ]
-            ]
-         },
-         {
-            "id" : "Athanasius",
-            "name" : "Athanasius",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ]
-            ]
-         },
-         {
-            "name" : "Daniel Mantovani",
-            "data" : [
-               [
-                  "Perl 5",
-                  1
-               ]
-            ],
-            "id" : "Daniel Mantovani"
-         },
-         {
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ]
-            ],
-            "name" : "Duane Powell",
-            "id" : "Duane Powell"
-         },
-         {
-            "id" : "Duncan C. White",
-            "name" : "Duncan C. White",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ]
-            ]
-         },
-         {
-            "id" : "E. Choroba",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ]
-            ],
-            "name" : "E. Choroba"
-         },
-         {
-            "name" : "Guillermo Ramos",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
                ]
             ],
-            "id" : "Guillermo Ramos"
-         },
-         {
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ],
-               [
-                  "Blog",
-                  1
-               ]
-            ],
-            "name" : "Jaldhar H. Vyas",
-            "id" : "Jaldhar H. Vyas"
-         },
-         {
-            "name" : "Joelle Maslak",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ]
-            ],
-            "id" : "Joelle Maslak"
-         },
-         {
-            "id" : "Kevin Colyer",
-            "name" : "Kevin Colyer",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ]
-            ]
-         },
-         {
-            "data" : [
-               [
-                  "Perl 5",
-                  1
-               ]
-            ],
-            "name" : "Kian-Meng Ang",
-            "id" : "Kian-Meng Ang"
-         },
-         {
-            "id" : "Laurent Rosenfeld",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ],
-               [
-                  "Blog",
-                  1
-               ]
-            ],
-            "name" : "Laurent Rosenfeld"
-         },
-         {
-            "id" : "Mark Senn",
-            "data" : [
-               [
-                  "Perl 6",
-                  1
-               ],
-               [
-                  "Blog",
-                  1
-               ]
-            ],
-            "name" : "Mark Senn"
-         },
-         {
-            "data" : [
-               [
-                  "Perl 6",
-                  1
-               ]
-            ],
-            "name" : "Ozzy",
-            "id" : "Ozzy"
-         },
-         {
-            "id" : "Randy Lauen",
-            "name" : "Randy Lauen",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ]
-            ]
-         },
-         {
             "id" : "Roger Bell West",
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  1
-               ],
-               [
-                  "Blog",
-                  1
-               ]
-            ],
             "name" : "Roger Bell West"
-         },
-         {
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ]
-            ],
-            "name" : "Ruben Westerberg",
-            "id" : "Ruben Westerberg"
-         },
-         {
-            "name" : "Simon Proctor",
-            "data" : [
-               [
-                  "Perl 6",
-                  2
-               ]
-            ],
-            "id" : "Simon Proctor"
-         },
-         {
-            "id" : "Steven Wilson",
-            "name" : "Steven Wilson",
-            "data" : [
-               [
-                  "Perl 5",
-                  1
-               ]
-            ]
-         },
-         {
-            "data" : [
-               [
-                  "Perl 5",
-                  2
-               ],
-               [
-                  "Perl 6",
-                  2
-               ],
-               [
-                  "Blog",
-                  1
-               ]
-            ],
-            "name" : "Yet Ebreo",
-            "id" : "Yet Ebreo"
          }
       ]
    },
-   "xAxis" : {
-      "type" : "category"
+   "subtitle" : {
+      "text" : "[Champions: 1] Last updated at 2019-08-26 14:15:33 GMT"
    },
-   "plotOptions" : {
-      "series" : {
-         "dataLabels" : {
-            "format" : "{point.y}",
-            "enabled" : 1
-         },
-         "borderWidth" : 0
+   "series" : [
+      {
+         "data" : [
+            {
+               "drilldown" : "Roger Bell West",
+               "y" : 4,
+               "name" : "Roger Bell West"
+            }
+         ],
+         "colorByPoint" : 1,
+         "name" : "Perl Weekly Challenge - 023"
       }
+   ],
+   "title" : {
+      "text" : "Perl Weekly Challenge - 023"
    },
    "tooltip" : {
-      "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
       "followPointer" : 1,
+      "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
       "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>"
    },
-   "chart" : {
-      "type" : "column"
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge - 022"
+   "legend" : {
+      "enabled" : 0
    }
 }
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 1c42dcbca3..682ab08b23 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,37 +1,48 @@
 {
-   "xAxis" : {
-      "labels" : {
-         "style" : {
-            "fontSize" : "13px",
-            "fontFamily" : "Verdana, sans-serif"
-         }
-      },
-      "type" : "category"
-   },
-   "legend" : {
-      "enabled" : "false"
+   "tooltip" : {
+      "pointFormat" : "<b>{point.y:.0f}</b>"
    },
    "chart" : {
       "type" : "column"
    },
-   "subtitle" : {
-      "text" : "Last updated at 2019-08-26 00:00:07 GMT"
-   },
-   "tooltip" : {
-      "pointFormat" : "<b>{point.y:.0f}</b>"
-   },
    "title" : {
       "text" : "Perl Weekly Challenge Contributions - 2019"
    },
    "yAxis" : {
+      "min" : 0,
       "title" : {
          "text" : null
+      }
+   },
+   "subtitle" : {
+      "text" : "Last updated at 2019-08-26 14:15:42 GMT"
+   },
+   "xAxis" : {
+      "labels" : {
+         "style" : {
+            "fontSize" : "13px",
+            "fontFamily" : "Verdana, sans-serif"
+         }
       },
-      "min" : 0
+      "type" : "category"
+   },
+   "legend" : {
+      "enabled" : "false"
    },
    "series" : [
       {
-         "name" : "Contributions",
+         "dataLabels" : {
+            "y" : 10,
+            "rotation" : -90,
+            "format" : "{point.y:.0f}",
+            "align" : "right",
+            "enabled" : "true",
+            "color" : "#FFFFFF",
+            "style" : {
+               "fontSize" : "13px",
+               "fontFamily" : "Verdana, sans-serif"
+            }
+         },
          "data" : [
             [
                "Blog",
@@ -39,25 +50,14 @@
             ],
             [
                "Perl 5",
-               918
+               920
             ],
             [
                "Perl 6",
-               550
+               552
             ]
          ],
-         "dataLabels" : {
-            "y" : 10,
-            "color" : "#FFFFFF",
-            "enabled" : "true",
-