- Added solutions by Colin Crain.

18 files changed, 2330 insertions, 2058 deletions

diff --git a/challenge-135/colin-crain/perl/ch-1.pl b/challenge-135/colin-crain/perl/ch-1.pl
new file mode 100755
index 0000000000..b7c9f3dac5
--- /dev/null
+++ b/challenge-135/colin-crain/perl/ch-1.pl
@@ -0,0 +1,77 @@
+#!/Users/colincrain/perl5/perlbrew/perls/perl-5.32.0/bin/perl

+#

+#       135-1-middling-thruppence.pl

+#

+#       Middle 3-digits

+#         Submitted by: Mohammad S Anwar

+#         You are given an integer.

+# 

+#         Write a script find out the middle 3-digits of the given integer,

+#         if possible otherwise throw sensible error.

+# 

+#         Example 1

+#             Input: $n = 1234567

+#             Output: 345

+#     

+#         Example 2

+#             Input: $n = -123

+#             Output: 123

+#     

+#         Example 3

+#             Input: $n = 1

+#             Output: too short

+#     

+#         Example 4

+#             Input: $n = 10

+#             Output: even number of digits

+#

+#       © 2021 colin crain

+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##

+

+

+

+use warnings;

+use strict;

+use utf8;

+use feature ":5.26";

+use feature qw(signatures);

+no warnings 'experimental::signatures';

+

+

+## main

+say middle_three( shift @ARGV ) if @ARGV;

+

+

+

+sub middle_three ( $num ) {

+

+    $num =~ s/^-//;

+    return "input does not appear to be a number" 

+        if $num =~ /\D/;

+

+    my $len = length $num;

+    return "input too short"

+        if $len < 3

+    return "input has an even number of digits"

+        unless $len % 2

+    

+    while ( length $num > 3 ) {

+        substr $num, -1, 1, '';

+        substr $num,  0, 1, '';

+    }

+    

+    return $num;

+}

+

+

+

+use Test::More;

+

+is middle_three( 1234567 ), 345, 'ex-1';

+is middle_three( -123    ), 123, 'ex-2';

+is middle_three( 1       ), "input too short", 'ex-3';

+is middle_three( 1000    ), "input has an even number of digits", 'ex-4 variant';

+is middle_three( "9BAD0"    ), "input does not appear to be a number", 'alphanumeric';

+

+

+done_testing();

diff --git a/challenge-135/colin-crain/perl/ch-2.pl b/challenge-135/colin-crain/perl/ch-2.pl
new file mode 100755
index 0000000000..088be8a56d
--- /dev/null
+++ b/challenge-135/colin-crain/perl/ch-2.pl
@@ -0,0 +1,82 @@
+#!/Users/colincrain/perl5/perlbrew/perls/perl-5.32.0/bin/perl

+#

+#       do-they-like-us-at-all.pl

+#

+#       Validate SEDOL

+#         Submitted by: Mohammad S Anwar

+#         You are given 7-characters alphanumeric SEDOL.

+# 

+#         Write a script to validate the given SEDOL. 

+#         Print 1 if it is a valid SEDOL otherwise 0.

+# 

+#         For more information about SEDOL, please checkout the wikipedia page.

+# 

+#         Example 1

+#             Input: $SEDOL = '2936921'

+#             Output: 1

+#             

+#         Example 2

+#             Input: $SEDOL = '1234567'

+#             Output: 0

+# 

+#         Example 3

+#             Input: $SEDOL = 'B0YBKL9'

+#             Output: 1

+#

+#       © 2021 colin crain

+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##

+

+

+

+use warnings;

+use strict;

+use utf8;

+use feature ":5.26";

+use feature qw(signatures);

+no warnings 'experimental::signatures';

+

+

+## main

+say validate_sedol( shift @ARGV ) if @ARGV;

+

+

+

+sub validate_sedol ( $candidate ) {

+

+    return 0 if $candidate =~ m/ [AEIOU] | \W /ix or length $candidate != 7 ;

+

+    ## assign alphanumeric values

+    my $val = -1;

+    my %clookup = map { $_ => ++$val } (0..9, 'A'..'Z');

+

+    ## fixed SEDOL weight values 

+    my $ws = 0;

+    my @weights = (1, 3, 1, 7, 3, 9, 1);

+

+    $ws += $weights[$_] * $clookup{ substr $candidate, $_, 1 } for (0..5);

+

+    my $cs_calculated = ( 10 - $ws % 10) % 10;

+    my $cs_digit      = substr $candidate, 6, 1;

+

+    return $cs_digit == $cs_calculated 

+        ? 1 

+        : 0 ;

+}

+

+

+

+

+

+

+

+use Test::More;

+

+is validate_sedol( "0263494" ),     1, 'ex-0263494';

+is validate_sedol( "02634940" ),    0, 'too long';

+is validate_sedol( "026349" ),      0, 'too short';

+is validate_sedol( "0263495" ),     0, 'wrong checksum';

+is validate_sedol( "B2634Z9" ),     1, 'alpha, starts with B';

+

+done_testing();

+

+

diff --git a/challenge-135/colin-crain/raku/ch-1.raku b/challenge-135/colin-crain/raku/ch-1.raku
new file mode 100755
index 0000000000..7d7d4c02b6
--- /dev/null
+++ b/challenge-135/colin-crain/raku/ch-1.raku
@@ -0,0 +1,55 @@
+#!/usr/bin/env perl6
+#
+#
+#       135-1-middling-thruppence.raku
+#
+#       Middle 3-digits
+#         Submitted by: Mohammad S Anwar
+#         You are given an integer.
+# 
+#         Write a script find out the middle 3-digits of the given integer,
+#         if possible otherwise throw sensible error.
+# 
+#         Example 1
+#             Input: $n = 1234567
+#             Output: 345
+#     
+#         Example 2
+#             Input: $n = -123
+#             Output: 123
+#     
+#         Example 3
+#             Input: $n = 1
+#             Output: too short
+#     
+#         Example 4
+#             Input: $n = 10
+#             Output: even number of digits
+# 
+#
+#       © 2021 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+use Test;
+
+is mid3( 1234567 ), 345,                        'ex-1';
+is mid3( -123 ),    123,                        'ex-2';
+is mid3( 1 ),       "input too short",          'ex-3';
+is mid3( 1000 ),    "even number of digits",    'ex-4';
+
+
+sub mid3 ( $num is copy ) {
+
+    $num .= abs;
+    
+    given $num.chars {
+        when    $_ < 3      { return "input too short" }
+        when    $_ %% 2     { return "even number of digits" }
+    }
+    
+    $num.substr: ($num.chars/2).floor-1, 3
+}
+
+
diff --git a/challenge-135/colin-crain/raku/ch-2.raku b/challenge-135/colin-crain/raku/ch-2.raku
new file mode 100755
index 0000000000..6c332a6167
--- /dev/null
+++ b/challenge-135/colin-crain/raku/ch-2.raku
@@ -0,0 +1,50 @@
+#!/usr/bin/env perl6
+#
+#
+#       135-2-do-they-like-us-at-all.raku
+#
+#
+#
+#       © 2021 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+use Test;
+
+is validate_sedol( "0263494" ),     1, 'ex-0263494';
+is validate_sedol( "02634940" ),    0, 'too long';
+is validate_sedol( "026349" ),      0, 'too short';
+is validate_sedol( "0263495" ),     0, 'wrong checksum';
+is validate_sedol( "B2634Z9" ),     1, 'alpha, starts with B';
+
+
+
+
+
+
+
+sub validate_sedol ( $code ) {
+
+    return 0 if $code ~~ m:i/ <[AEIOU]> | \W / or $code.chars != 7;
+
+    ## assign alphanumeric values
+    my %clookup = (|('0'..'9'), |('A'..'Z')).kv.reverse;
+
+    ## fixed SEDOL weight values 
+    my @weights = 1, 3, 1, 7, 3, 9, 1;
+    
+    my $ws = (0..5).map({ @weights[$_] * %clookup{ $code.substr($_, 1) } })
+                   .sum;
+
+    my $cs_calculated = (10 - $ws % 10) % 10;
+    my $cs_digit      = $code.substr: 6, 1;
+    
+    return $cs_digit == $cs_calculated 
+        ?? 1
+        !! 0
+}
+
+
+
+
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 6e29b0fdc3..d7fc142246 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,11 +1,25 @@
 {
-   "legend" : {
-      "enabled" : 0
+   "chart" : {
+      "type" : "column"
+   },
+   "plotOptions" : {
+      "series" : {
+         "dataLabels" : {
+            "format" : "{point.y}",
+            "enabled" : 1
+         },
+         "borderWidth" : 0
+      }
+   },
+   "title" : {
+      "text" : "The Weekly Challenge - 135"
+   },
+   "subtitle" : {
+      "text" : "[Champions: 33] Last updated at 2021-10-24 22:26:38 GMT"
    },
    "drilldown" : {
       "series" : [
          {
-            "id" : "Abigail",
             "data" : [
                [
                   "Perl",
@@ -16,6 +30,7 @@
                   2
                ]
             ],
+            "id" : "Abigail",
             "name" : "Abigail"
          },
          {
@@ -33,24 +48,24 @@
             "name" : "Adam Russell"
          },
          {
-            "name" : "Andinus",
             "data" : [
                [
                   "Raku",
                   1
                ]
             ],
-            "id" : "Andinus"
+            "id" : "Andinus",
+            "name" : "Andinus"
          },
          {
+            "name" : "Andrezgz",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Andrezgz",
-            "name" : "Andrezgz"
+            "id" : "Andrezgz"
          },
          {
             "name" : "Arne Sommer",
@@ -72,7 +87,6 @@
          },
          {
             "name" : "Athanasius",
-            "id" : "Athanasius",
             "data" : [
                [
                   "Perl",
@@ -82,47 +96,56 @@
                   "Raku",
                   2
                ]
-            ]
+            ],
+            "id" : "Athanasius"
          },
          {
-            "name" : "Ben Davies",
             "id" : "Ben Davies",
             "data" : [
                [
                   "Raku",
                   2
                ]
-            ]
+            ],
+            "name" : "Ben Davies"
          },
          {
-            "id" : "Cheok-Yin Fung",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
+            "id" : "Cheok-Yin Fung",
             "name" : "Cheok-Yin Fung"
          },
          {
-            "name" : "Colin Crain",
-            "id" : "Colin Crain",
             "data" : [
                [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ],
+               [
                   "Blog",
                   1
                ]
-            ]
+            ],
+            "id" : "Colin Crain",
+            "name" : "Colin Crain"
          },
          {
             "name" : "Cristina Heredia",
+            "id" : "Cristina Heredia",
             "data" : [
                [
                   "Perl",
                   1
                ]
-            ],
-            "id" : "Cristina Heredia"
+            ]
          },
          {
             "name" : "Dave Jacoby",
@@ -139,26 +162,27 @@
             "id" : "Dave Jacoby"
          },
          {
+            "name" : "Duncan C. White",
+            "id" : "Duncan C. White",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ],
-            "id" : "Duncan C. White",
-            "name" : "Duncan C. White"
+            ]
          },
          {
-            "name" : "E. Choroba",
+            "id" : "E. Choroba",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "E. Choroba"
+            "name" : "E. Choroba"
          },
          {
+            "name" : "Flavio Poletti",
             "data" : [
                [
                   "Perl",
@@ -173,8 +197,7 @@
                   2
                ]
             ],
-            "id" : "Flavio Poletti",
-            "name" : "Flavio Poletti"
+            "id" : "Flavio Poletti"
          },
          {
             "id" : "James Smith",
@@ -191,14 +214,14 @@
             "name" : "James Smith"
          },
          {
-            "name" : "Jan Krnavek",
             "id" : "Jan Krnavek",
             "data" : [
                [
                   "Raku",
                   2
                ]
-            ]
+            ],
+            "name" : "Jan Krnavek"
          },
          {
             "name" : "Jorg Sommrey",
@@ -239,16 +262,17 @@
             ]
          },
          {
+            "id" : "Lubos Kolouch",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Lubos Kolouch",
             "name" : "Lubos Kolouch"
          },
          {
+            "name" : "Luca Ferrari",
             "data" : [
                [
                   "Raku",
@@ -259,21 +283,20 @@
                   2
                ]
             ],
-            "id" : "Luca Ferrari",
-            "name" : "Luca Ferrari"
+            "id" : "Luca Ferrari"
          },
          {
+            "name" : "Matthew Neleigh",
             "id" : "Matthew Neleigh",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ],
-            "name" : "Matthew Neleigh"
+            ]
          },
          {
-            "id" : "Mohammad S Anwar",
+            "name" : "Mohammad S Anwar",
             "data" : [
                [
                   "Perl",
@@ -284,49 +307,50 @@
                   1
                ]
             ],
-            "name" : "Mohammad S Anwar"
+            "id" : "Mohammad S Anwar"
          },
          {
-            "name" : "Niels van Dijke",
-            "id" : "Niels van Dijke",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ]
+            ],
+            "id" : "Niels van Dijke",
+            "name" : "Niels van Dijke"
          },
          {
+            "name" : "Paulo Custodio",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Paulo Custodio",
-            "name" : "Paulo Custodio"
+            "id" : "Paulo Custodio"
          },
          {
-            "name" : "Pete Houston",
             "id" : "Pete Houston",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ]
+            ],
+            "name" : "Pete Houston"
          },
          {
-            "name" : "Peter Campbell Smith",
-            "id" : "Peter Campbell Smith",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ]
+            ],
+            "id" : "Peter Campbell Smith",
+            "name" : "Peter Campbell Smith"
          },
          {
+            "name" : "Roger Bell_West",
             "data" : [
                [
                   "Perl",
@@ -341,10 +365,10 @@
                   1
                ]
             ],
-            "id" : "Roger Bell_West",
-            "name" : "Roger Bell_West"
+            "id" : "Roger Bell_West"
          },
          {
+            "name" : "Simon Green",
             "data" : [
                [
                   "Perl",
@@ -355,22 +379,20 @@
                   1
                ]
             ],
-            "id" : "Simon Green",
-            "name" : "Simon Green"
+            "id" : "Simon Green"
          },
          {
+            "name" : "Steven Wilson",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Steven Wilson",
-            "name" : "Steven Wilson"
+            "id" : "Steven Wilson"
          },
          {
             "name" : "Ulrich Rieke",
-            "id" : "Ulrich Rieke",
             "data" : [
                [
                   "Perl",
@@ -380,10 +402,11 @@
                   "Raku",
                   2
                ]
-            ]
+            ],
+            "id" : "Ulrich Rieke"
          },
          {
-            "name" : "W. Luis Mochan",
+            "id" : "W. Luis Mochan",
             "data" : [
                [
                   "Perl",
@@ -394,16 +417,16 @@
                   1
                ]
             ],
-            "id" : "W. Luis Mochan"
+            "name" : "W. Luis Mochan"
          },
          {
-            "id" : "Wanderdoc",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
+            "id" : "Wanderdoc",
             "name" : "Wanderdoc"
          }
       ]
@@ -413,64 +436,69 @@
          "text" : "Total Solutions"
       }
    },
+   "tooltip" : {
+      "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>",
+      "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
+      "followPointer" : 1
+   },
    "series" : [
       {
          "colorByPoint" : 1,
          "data" : [
             {
-               "name" : "Abigail",
+               "drilldown" : "Abigail",
                "y" : 4,
-               "drilldown" : "Abigail"
+               "name" : "Abigail"
             },
             {
                "drilldown" : "Adam Russell",
-               "y" : 4,
-               "name" : "Adam Russell"
+               "name" : "Adam Russell",
+               "y" : 4
             },
             {
-               "name" : "Andinus",
                "y" : 1,
+               "name" : "Andinus",
                "drilldown" : "Andinus"
             },
             {
-               "name" : "Andrezgz",
+               "drilldown" : "Andrezgz",
                "y" : 2,
-               "drilldown" : "Andrezgz"
+               "name" : "Andrezgz"
             },
             {
-               "y" : 5,
                "drilldown" : "Arne Sommer",
-               "name" : "Arne Sommer"
+               "name" : "Arne Sommer",
+               "y" : 5
             },
             {
+               "name" : "Athanasius",
                "y" : 4,
-               "drilldown" : "Athanasius",
-               "name" : "Athanasius"
+               "drilldown" : "Athanasius"
             },
             {
-               "y" : 2,
                "drilldown" : "Ben Davies",
-               "name" : "Ben Davies"
+               "name" : "Ben Davies",
+               "y" : 2
             },
             {
+               "drilldown" : "Cheok-Yin Fung",
                "name" : "Cheok-Yin Fung",
-               "y" : 2,
-               "drilldown" : "Cheok-Yin Fung"
+               "y" : 2
             },
             {
-               "y" : 1,
                "drilldown" : "Colin Crain",
+               "y" : 5,
                "name" : "Colin Crain"
             },
             {
-               "y" : 1,
                "drilldown" : "Cristina Heredia",
+               "y" : 1,
                "name" : "Cristina Heredia"
             },
             {
+               "y" : 3,
                "name" : "Dave Jacoby",
-               "drilldown" : "Dave Jacoby",
-               "y" : 3
+               "drilldown" : "Dave Jacoby"
             },
             {
                "name" : "Duncan C. White",
@@ -478,24 +506,24 @@
                "drilldown" : "Duncan C. White"
             },
             {
+               "drilldown" : "E. Choroba",
                "name" : "E. Choroba",
-               "y" : 2,
-               "drilldown" : "E. Choroba"
+               "y" : 2
             },
             {
+               "y" : 6,
                "name" : "Flavio Poletti",
-               "drilldown" : "Flavio Poletti",
-               "y" : 6
+               "drilldown" : "Flavio Poletti"
             },
             {
-               "drilldown" : "James Smith",
                "y" : 3,
-               "name" : "James Smith"
+               "name" : "James Smith",
+               "drilldown" : "James Smith"
             },
             {
+               "drilldown" : "Jan Krnavek",
                "name" : "Jan Krnavek",
-               "y" : 2,
-               "drilldown" : "Jan Krnavek"
+               "y" : 2
             },
             {
                "drilldown" : "Jorg Sommrey",
@@ -504,37 +532,37 @@
             },
             {
                "drilldown" : "Lance Wicks",
-               "y" : 1,
-               "name" : "Lance Wicks"
+               "name" : "Lance Wicks",
+               "y" : 1
             },
             {
-               "y" : 5,
                "drilldown" : "Laurent Rosenfeld",
+               "y" : 5,
                "name" : "Laurent Rosenfeld"
             },
             {
-               "name" : "Lubos Kolouch",
                "drilldown" : "Lubos Kolouch",
-               "y" : 2
+               "y" : 2,
+               "name" : "Lubos Kolouch"
             },
             {
-               "drilldown" : "Luca Ferrari",
+               "name" : "Luca Ferrari",
                "y" : 4,
-               "name" : "Luca Ferrari"
+               "drilldown" : "Luca Ferrari"
             },
             {
-               "name" : "Matthew Neleigh",
                "drilldown" : "Matthew Neleigh",
-               "y" : 2
+               "y" : 2,
+               "name" : "Matthew Neleigh"
             },
             {
+               "drilldown" : "Mohammad S Anwar",
                "name" : "Mohammad S Anwar",
-               "y" : 2,
-               "drilldown" : "Mohammad S Anwar"
+               "y" : 2
             },
             {
-               "name" : "Niels van Dijke",
                "drilldown" : "Niels van Dijke",
+               "name" : "Niels van Dijke",
                "y" : 2
             },
             {
@@ -544,72 +572,52 @@
             },
             {
                "y" : 2,
-               "drilldown" : "Pete Houston",
-               "name" : "Pete Houston"
+               "name" : "Pete Houston",
+               "drilldown" : "Pete Houston"
             },
             {
+               "name" : "Peter Campbell Smith",
                "y" : 2,
-               "drilldown" : "Peter Campbell Smith",
-               "name" : "Peter Campbell Smith"
+               "drilldown" : "Peter Campbell Smith"
             },
             {
+               "y" : 5,
                "name" : "Roger Bell_West",
-               "drilldown" : "Roger Bell_West",
-               "y" : 5
+               "drilldown" : "Roger Bell_West"
             },
             {
-               "name" : "Simon Green",
                "y" : 3,
+               "name" : "Simon Green",
                "drilldown" : "Simon Green"
             },
             {
+               "drilldown" : "Steven Wilson",
                "name" : "Steven Wilson",
-               "y" : 2,
-               "drilldown" : "Steven Wilson"
+               "y" : 2
             },
             {
+               "drilldown" : "Ulrich Rieke",
                "name" : "Ulrich Rieke",
-               "y" : 4,
-               "drilldown" : "Ulrich Rieke"
+               "y" : 4
             },
             {
+               "y" : 3,
                "name" : "W. Luis Mochan",
-               "drilldown" : "W. Luis Mochan",
-               "y" : 3
+               "drilldown" : "W. Luis Mochan"
             },
             {
                "drilldown" : "Wanderdoc",
-               "y" : 2,
-               "name" : "Wanderdoc"
+               "name" : "Wanderdoc",
+               "y" : 2
             }
          ],
          "name" : "The Weekly Challenge - 135"
       }
    ],
-   "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/>"
-   },
-   "subtitle" : {
-      "text" : "[Champions: 33] Last updated at 2021-10-24 22:13:38 GMT"
-   },
-   "plotOptions" : {
-      "series" : {
-         "dataLabels" : {
-            "format" : "{point.y}",
-            "enabled" : 1
-         },
-         "borderWidth" : 0
-      }
-   },
-   "chart" : {
-      "type" : "column"
+   "legend" : {
+      "enabled" : 0
    },
    "xAxis" : {
       "type" : "category"
-   },
-   "title" : {
-      "text" : "The Weekly Challenge - 135"
    }
 }
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index bd7519faf0..683215ea9c 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,28 +1,21 @@
 {
+   "xAxis" : {
+      "type" : "category",
+      "labels" : {
+         "style" : {
+            "fontSize" : "13px",
+            "fontFamily" : "Verdana, sans-serif"
+         }
+      }
+   },
    "tooltip" : {
       "pointFormat" : "<b>{point.y:.0f}</b>"
    },
-   "yAxis" : {
-      "title" : {
-         "text" : null
-      },
-      "min" : 0
+   "legend" : {
+      "enabled" : "false"
    },
    "series" : [
       {
-         "name" : "Contributions",
-         "dataLabels" : {
-            "format" : "{point.y:.0f}",
-            "style" : {
-               "fontFamily" : "Verdana, sans-serif",
-               "fontSize" : "13px"
-            },
-            "color" : "#FFFFFF",
-            "enabled" : "true",
-            "y" : 10,
-            "rotation" : -90,
-            "align" : "right"
-         },
          "data" : [
             [
                "Blog",
@@ -30,34 +23,41 @@
             ],
             [
                "Perl",
-               6460
+               6462
             ],
             [
                "Raku",
-               3935
+               3937
             ]
-         ]
+         ],
+         "name" : "Contributions",
+         "dataLabels" : {
+            "color" : "#FFFFFF",
+            "align" : "right",
+            "y" : 10,
+            "format" : "{point.y:.0f}",
+            "rotation" : -90,
+            "style" : {
+               "fontSize" : "13px",
+               "fontFamily" : "Verdana, sans-serif"
+            },
+            "enabled" : "true"
+         }
       }
    ],
-   "legend" : {
-      "enabled" : "false"
-   },
    "title" : {
       "text" : "The Weekly Challenge Contributions [2019 - 2021]"
    },
-   "chart" : {
-      "type" : "column"
+   "subtitle" : {
+      "text" : "Last updated at 2021-10-24 22:26:37 GMT"
    },
-   "xAxis" : {
-      "type" : "category",
-      "labels" : {
-         "style" : {
-            "fontFamily" : "Verdana, sans-serif",
-            "fontSize" : "13px"
-         }
-      }
+   "yAxis" : {
+      "title" : {
+         "text" : null
+      },
+      "min" : 0
    },
-   "subtitle" : {
-      "text" : "Last updated at 2021-10-24 22:13:38 GMT"
+   "chart" : {
+      "type" : "column"
    }
 }
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 4349c37c76..e1e7f6dea7 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -1,726 +1,12 @@
 {
-   "title" : {
-      "text" : "The Weekly Challenge Language"
-   },
-   "chart" : {
-      "type" : "column"
-   },
-   "xAxis" : {
-      "type" : "category"
-   },
-   "subtitle" : {
-      "text" : "Click the columns to dril