- Added solutions by Colin Crain.

12 files changed, 1513 insertions, 1284 deletions

diff --git a/challenge-043/colin-crain/perl/ch-1.pl b/challenge-043/colin-crain/perl/ch-1.pl
new file mode 100644
index 0000000000..80dcde2c9e
--- /dev/null
+++ b/challenge-043/colin-crain/perl/ch-1.pl
@@ -0,0 +1,100 @@
+#! /opt/local/bin/perl
+#
+#       olympics.pl
+#
+#       PWC 43 - TASK #1
+#         Olympic Rings
+#             There are 5 rings in the Olympic Logo as shown below.
+#             They are color coded as in Blue, Black, Red, Yellow and Green.
+#
+#         ( Blue 8 )                        ( blacK )                      (  Red 9 )
+#              (Blue ⋂ Yellow)  (Yellow ⋂ blacK)  (blacK ⋂ Green)  (Green ⋂ Red)
+#                        ( Yellow 7 )                        ( Green 5 )
+#
+#             We have allocated some numbers to these rings as below:
+#
+#             Blue:     8
+#             Yellow:   7
+#             Green:    5
+#             Red:      9
+#             The Black ring is empty currently. You are given the numbers 1, 2,
+#             3, 4 and 6. Write a script to place these numbers in the rings so
+#             that the sum of numbers in each ring is exactly 11.
+#
+#         method: it took a bit of fidddling to understand what the challenge
+#             is asking here: to place the numbers given within the empty
+#             spaces of the ring diagram such that the total of all numbers
+#             contained within each ring is 11. There are 9 such spaces: 5
+#             rings and 4 intersections. 4 rings are assigned, leaving 5 areas
+#             unassigned. We are given a list of 5 numbers, so it seems that
+#             the request is one number per area (solving the puzzle by hand
+#             corroborates this interpretation).
+#
+#             So, we can rephrase the challenge as a system of linear equations
+#             to be solved:
+#
+#                 Blue:   8 + B⋂Y         = 11
+#                 Yellow: B⋂Y + 7 + Y⋂K   = 11
+#                 blacK:  Y⋂K + K + K⋂G   = 11
+#                 Green:  K⋂G + 5 + G⋂R   = 11
+#                 Red:    G⋂R + 9         = 11
+#
+#             -->     B⋂Y                         = 3
+#                     B⋂Y + Y⋂K                   = 4
+#                           Y⋂K + K + K⋂G         = 11
+#                                     K⋂G + G⋂R   = 6
+#                                           G⋂R   = 2
+#
+#             -->     | 1  0  0  0  0 |   | B⋂Y |   |  3 |         Ax = b form
+#                     | 1  1  0  0  0 |   | Y⋂K |   |  4 |
+#                     | 0  1  1  1  0 | . |  K  | = | 11 |
+#                     | 0  0  0  1  1 |   | K⋂G |   |  6 |
+#                     | 0  0  0  0  1 |   | G⋂R |   |  2 |
+#
+#               and we solve:
+#               Ax = b
+#               --> (A-1) • A • x = (A-1) • b
+#               --> I • x = (A-1) • b
+#               --> (A-1) • b = x
+#
+#               We generate the inverse of A and plug in to find x, vector of
+#               the solution.
+#
+#
+#       2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+use warnings;
+use strict;
+use feature ":5.26";
+
+## ## ## ## ## MAIN
+
+use Math::MatrixReal;
+
+my $a = Math::MatrixReal->new_from_string(<<MATRIX);
+[ 1 0 0 0 0 ]
+[ 1 1 0 0 0 ]
+[ 0 1 1 1 0 ]
+[ 0 0 0 1 1 ]
+[ 0 0 0 0 1 ]
+MATRIX
+
+my $b = Math::MatrixReal->new_from_string(<<MATRIX);
+[ 3  ]
+[ 4  ]
+[ 11 ]
+[ 6  ]
+[ 2  ]
+MATRIX
+
+my $LR = $a->decompose_LR();
+my ($dim, $out, $base) = $LR->solve_LR($b);
+
+say "there is only one solution:\n" if $dim == 0;
+
+my @values = qw(Blue-Yellow Yellow-Black Black Black-Green Green-Red);
+my @solution = $out->as_list;
+printf "%-12s = %d\n", $_, (shift @solution) for @values;
diff --git a/challenge-043/colin-crain/perl/ch-2.pl b/challenge-043/colin-crain/perl/ch-2.pl
new file mode 100644
index 0000000000..c51d01dd24
--- /dev/null
+++ b/challenge-043/colin-crain/perl/ch-2.pl
@@ -0,0 +1,114 @@
+#! /opt/local/bin/perl
+#
+#       ch-2.pl
+#
+#       PWC 43 - TASK #2
+#             Self-descriptive Numbers
+#                 Write a script to generate Self-descriptive Numbers in a given
+#                 base.
+#
+#                 In mathematics, a self-descriptive number is an integer m that in
+#                 a given base b is b digits long in which each digit d at position
+#                 n (the most significant digit being at position 0 and the least
+#                 significant at position b - 1) counts how many instances of digit
+#                 n are in m.
+#
+#                 For example, if the given base is 10, then script should print
+#                 6210001000.
+#
+#            method:
+#                 There are two basic ways to approach this problem:
+#
+#                 1. The formula:
+#
+#                       (b-4)b^(b-1) + 2b^(b-2) + b^(b-3) + b^3
+#
+#                 will generate a self-descriptive number for any base 7+.
+#                 However the formula is in base10, so we will need to convert
+#                 the base10 number to the relevant base to see its
+#                 self-descriptive nature. Because the numbers get quite large,
+#                 we will need to utilize the bigint pragma
+#
+#                 2. Alternately, we could just assemble a number out of whole cloth,
+#                 as the interesting qualities of the numbers are based on numeric
+#                 position rather than mathematical quirks. Logic, more than math,
+#                 defines whether numbers exist in the lower end of the range, and
+#                 above 6, the numbers follow a set positional pattern.
+#
+#                 A little logical excursion shows, for example, that for binary,
+#                 with 1 and 0 available, no number can exist. No number can have
+#                 a 0 in the 0th position, as its existence nullifies itself. In
+#                 binary we have two positions available, so if the 0th is 1, the
+#                 first must be 0, being the 0 counted in the 0th position, but
+#                 that again leads to contradiction. So no binary. Similar logic
+#                 applies for tertinary, but for quartinary we can construct 2100.
+#                 For bases 5 and 6 again we get nothing, but after 6 the pattern:
+#
+#                         position    value
+#                         0           (b-4)
+#                         1           2
+#                         2           1
+#                         ...         0   in quantity (b-7)
+#                         (b-3)       1
+#                         (b-2)       0
+#                         (b-1)       0
+#                         b           0
+#
+#                 so we can build arbitrarily large numbers for bases > 6 by
+#                 assembling strings:
+#
+#                         "(base - 4) displayed in the base" + "21"
+#                                         + "(base -7) number of 0s" + "1000"
+#
+#                 Comparison with the formulaic derivation we can see that the
+#                 results are the same.
+#
+#
+#       2020 colin crain
+## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
+
+
+
+use warnings;
+use strict;
+use feature ":5.26";
+
+use bigint;
+
+## ## ## ## ## MAIN
+
+my $base;
+
+say "derived numbers:";
+for $base (7..39){
+    printf "%2d     %s\n", $base, self_descriptive($base);
+}
+
+say "";
+
+say "assembled numbers:";
+for $base (7..39){
+    printf "%2d     %s\n", $base, self_descriptive_assembled($base);
+}
+
+sub self_descriptive {
+## formula for creating self-descriptive numbers in base 10 for a given base ( > 7 )
+    my $base = shift;
+    my $dec = ($base-4)*($base**($base-1)) + 2*($base**($base-2)) + $base**($base-3) + $base**3;
+    my @alphanum = (0..9, 'A'..'Z');
+    my $out = "";
+    my $rem;
+    while ( $dec > 0 ) {
+        ($dec, $rem) = (int( $dec/$base ), $dec % $base);
+        $out = $alphanum[$rem] . $out;
+    }
+    return $out;
+}
+
+sub self_descriptive_assembled {
+## or we can just assemble a graphical representation of a number manually that will fit the bill
+    my $base = shift;
+    my @alphanum = (0..9, 'A'..'Z');
+    my $out = $alphanum[$base-4] . "21" . "0" x ($base-7) . "1000";
+    return $out;
+}
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index c11e997ec2..c455f9bb8b 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,8 +1,123 @@
 {
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
+   "series" : [
+      {
+         "data" : [
+            {
+               "name" : "Adam Russell",
+               "drilldown" : "Adam Russell",
+               "y" : 3
+            },
+            {
+               "name" : "Alicia Bielsa",
+               "drilldown" : "Alicia Bielsa",
+               "y" : 1
+            },
+            {
+               "drilldown" : "Andrezgz",
+               "y" : 2,
+               "name" : "Andrezgz"
+            },
+            {
+               "y" : 4,
+               "drilldown" : "Burkhard Nickels",
+               "name" : "Burkhard Nickels"
+            },
+            {
+               "drilldown" : "Colin Crain",
+               "y" : 2,
+               "name" : "Colin Crain"
+            },
+            {
+               "name" : "Cristina Heredia",
+               "y" : 2,
+               "drilldown" : "Cristina Heredia"
+            },
+            {
+               "y" : 3,
+               "drilldown" : "Dave Jacoby",
+               "name" : "Dave Jacoby"
+            },
+            {
+               "drilldown" : "Duane Powell",
+               "y" : 2,
+               "name" : "Duane Powell"
+            },
+            {
+               "drilldown" : "E. Choroba",
+               "y" : 3,
+               "name" : "E. Choroba"
+            },
+            {
+               "name" : "Jaldhar H. Vyas",
+               "y" : 5,
+               "drilldown" : "Jaldhar H. Vyas"
+            },
+            {
+               "name" : "Javier Luque",
+               "drilldown" : "Javier Luque",
+               "y" : 5
+            },
+            {
+               "y" : 2,
+               "drilldown" : "Markus Holzer",
+               "name" : "Markus Holzer"
+            },
+            {
+               "y" : 4,
+               "drilldown" : "Roger Bell West",
+               "name" : "Roger Bell West"
+            },
+            {
+               "name" : "Ruben Westerberg",
+               "y" : 4,
+               "drilldown" : "Ruben Westerberg"
+            },
+            {
+               "drilldown" : "Ryan Thompson",
+               "y" : 6,
+               "name" : "Ryan Thompson"
+            },
+            {
+               "drilldown" : "Saif Ahmed",
+               "y" : 2,
+               "name" : "Saif Ahmed"
+            },
+            {
+               "name" : "Simon Proctor",
+               "y" : 2,
+               "drilldown" : "Simon Proctor"
+            },
+            {
+               "name" : "Wanderdoc",
+               "y" : 2,
+               "drilldown" : "Wanderdoc"
+            }
+         ],
+         "name" : "Perl Weekly Challenge - 043",
+         "colorByPoint" : 1
+      }
+   ],
+   "chart" : {
+      "type" : "column"
+   },
+   "subtitle" : {
+      "text" : "[Champions: 18] Last updated at 2020-01-20 02:27:21 GMT"
+   },
+   "xAxis" : {
+      "type" : "category"
+   },
    "tooltip" : {
       "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/>"
+      "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/>"
+   },
+   "legend" : {
+      "enabled" : 0
    },
    "drilldown" : {
       "series" : [
@@ -17,31 +132,32 @@
                   1
                ]
             ],
-            "name" : "Adam Russell",
-            "id" : "Adam Russell"
+            "id" : "Adam Russell",
+            "name" : "Adam Russell"
          },
          {
+            "id" : "Alicia Bielsa",
+            "name" : "Alicia Bielsa",
             "data" : [
                [
                   "Perl",
                   1
                ]
-            ],
-            "name" : "Alicia Bielsa",
-            "id" : "Alicia Bielsa"
+            ]
          },
          {
-            "name" : "Andrezgz",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Andrezgz"
+            "id" : "Andrezgz",
+            "name" : "Andrezgz"
          },
          {
             "id" : "Burkhard Nickels",
+            "name" : "Burkhard Nickels",
             "data" : [
                [
                   "Perl",
@@ -51,21 +167,31 @@
                   "Raku",
                   2
                ]
-            ],
-            "name" : "Burkhard Nickels"
+            ]
+         },
+         {
+            "id" : "Colin Crain",
+            "name" : "Colin Crain",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
          },
          {
-            "name" : "Cristina Heredia",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Cristina Heredia"
+            "id" : "Cristina Heredia",
+            "name" : "Cristina Heredia"
          },
          {
             "id" : "Dave Jacoby",
+            "name" : "Dave Jacoby",
             "data" : [
                [
                   "Perl",
@@ -75,21 +201,19 @@
                   "Blog",
                   1
                ]
-            ],
-            "name" : "Dave Jacoby"
+            ]
          },
          {
             "name" : "Duane Powell",
+            "id" : "Duane Powell",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ],
-            "id" : "Duane Powell"
+            ]
          },
          {
-            "name" : "E. Choroba",
             "data" : [
                [
                   "Perl",
@@ -100,9 +224,12 @@
                   1
                ]
             ],
-            "id" : "E. Choroba"
+            "id" : "E. Choroba",
+            "name" : "E. Choroba"
          },
          {
+            "name" : "Jaldhar H. Vyas",
+            "id" : "Jaldhar H. Vyas",
             "data" : [
                [
                   "Perl",
@@ -116,12 +243,9 @@
                   "Blog",
                   1
                ]
-            ],
-            "name" : "Jaldhar H. Vyas",
-            "id" : "Jaldhar H. Vyas"
+            ]
          },
          {
-            "id" : "Javier Luque",
             "data" : [
                [
                   "Perl",
@@ -136,20 +260,22 @@
                   1
                ]
             ],
-            "name" : "Javier Luque"
+            "name" : "Javier Luque",
+            "id" : "Javier Luque"
          },
          {
-            "id" : "Markus Holzer",
             "data" : [
                [
                   "Raku",
                   2
                ]
             ],
+            "id" : "Markus Holzer",
             "name" : "Markus Holzer"
          },
          {
             "id" : "Roger Bell West",
+            "name" : "Roger Bell West",
             "data" : [
                [
                   "Perl",
@@ -159,11 +285,9 @@
                   "Raku",
                   2
                ]
-            ],
-            "name" : "Roger Bell West"
+            ]
          },
          {
-            "name" : "Ruben Westerberg",
             "data" : [
                [
                   "Perl",
@@ -174,10 +298,12 @@
                   2
                ]
             ],
+            "name" : "Ruben Westerberg",
             "id" : "Ruben Westerberg"
          },
          {
             "id" : "Ryan Thompson",
+            "name" : "Ryan Thompson",
             "data" : [
                [
                   "Perl",
@@ -191,28 +317,27 @@
                   "Blog",
                   2
                ]
-            ],
-            "name" : "Ryan Thompson"
+            ]
          },
          {
-            "id" : "Saif Ahmed",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "name" : "Saif Ahmed"
+            "name" : "Saif Ahmed",
+            "id" : "Saif Ahmed"
          },
          {
-            "name" : "Simon Proctor",
             "data" : [
                [
                   "Raku",
                   2
                ]
             ],
-            "id" : "Simon Proctor"
+            "id" : "Simon Proctor",
+            "name" : "Simon Proctor"
          },
          {
             "data" : [
@@ -226,126 +351,16 @@
          }
       ]
    },
-   "series" : [
-      {
-         "colorByPoint" : 1,
-         "name" : "Perl Weekly Challenge - 043",
-         "data" : [
-            {
-               "name" : "Adam Russell",
-               "y" : 3,
-               "drilldown" : "Adam Russell"
-            },
-            {
-               "y" : 1,
-               "drilldown" : "Alicia Bielsa",
-               "name" : "Alicia Bielsa"
-            },
-            {
-               "drilldown" : "Andrezgz",
-               "y" : 2,
-               "name" : "Andrezgz"
-            },
-            {
-               "name" : "Burkhard Nickels",
-               "y" : 4,
-               "drilldown" : "Burkhard Nickels"
-            },
-            {
-               "name" : "Cristina Heredia",
-               "y" : 2,
-               "drilldown" : "Cristina Heredia"
-            },
-            {
-               "name" : "Dave Jacoby",
-               "drilldown" : "Dave Jacoby",
-               "y" : 3
-            },
-            {
-               "name" : "Duane Powell",
-               "drilldown" : "Duane Powell",
-               "y" : 2
-            },
-            {
-               "name" : "E. Choroba",
-               "y" : 3,
-               "drilldown" : "E. Choroba"
-            },
-            {
-               "y" : 5,
-               "drilldown" : "Jaldhar H. Vyas",
-               "name" : "Jaldhar H. Vyas"
-            },
-            {
-               "name" : "Javier Luque",
-               "drilldown" : "Javier Luque",
-               "y" : 5
-            },
-            {
-               "name" : "Markus Holzer",
-               "y" : 2,
-               "drilldown" : "Markus Holzer"
-            },
-            {
-               "y" : 4,
-               "drilldown" : "Roger Bell West",
-               "name" : "Roger Bell West"
-            },
-            {
-               "name" : "Ruben Westerberg",
-               "drilldown" : "Ruben Westerberg",
-               "y" : 4
-            },
-            {
-               "drilldown" : "Ryan Thompson",
-               "y" : 6,
-               "name" : "Ryan Thompson"
-            },
-            {
-               "drilldown" : "Saif Ahmed",
-               "y" : 2,
-               "name" : "Saif Ahmed"
-            },
-            {
-               "drilldown" : "Simon Proctor",
-               "y" : 2,
-               "name" : "Simon Proctor"
-            },
-            {
-               "name" : "Wanderdoc",
-               "y" : 2,
-               "drilldown" : "Wanderdoc"
-            }
-         ]
-      }
-   ],
-   "legend" : {
-      "enabled" : 0
-   },
    "plotOptions" : {
       "series" : {
+         "borderWidth" : 0,
          "dataLabels" : {
             "enabled" : 1,
             "format" : "{point.y}"
-         },
-         "borderWidth" : 0
+         }
       }
    },
-   "chart" : {
-      "type" : "column"
-   },
-   "subtitle" : {
-      "text" : "[Champions: 17] Last updated at 2020-01-20 02:22:42 GMT"
-   },
    "title" : {
       "text" : "Perl Weekly Challenge - 043"
-   },
-   "xAxis" : {
-      "type" : "category"
-   },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Solutions"
-      }
    }
 }
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index e05f2a57d6..ece4507f9c 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,10 +1,45 @@
 {
+   "subtitle" : {
+      "text" : "Last updated at 2020-01-20 02:27:21 GMT"
+   },
    "tooltip" : {
       "pointFormat" : "<b>{point.y:.0f}</b>"
    },
+   "xAxis" : {
+      "type" : "category",
+      "labels" : {
+         "style" : {
+            "fontFamily" : "Verdana, sans-serif",
+            "fontSize" : "13px"
+         }
+      }
+   },
+   "title" : {
+      "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
+   },
+   "legend" : {
+      "enabled" : "false"
+   },
+   "yAxis" : {
+      "title" : {
+         "text" : null
+      },
+      "min" : 0
+   },
    "series" : [
       {
-         "name" : "Contributions",
+         "dataLabels" : {
+            "format" : "{point.y:.0f}",
+            "style" : {
+               "fontFamily" : "Verdana, sans-serif",
+               "fontSize" : "13px"
+            },
+            "align" : "right",
+            "y" : 10,
+            "rotation" : -90,
+            "enabled" : "true",
+            "color" : "#FFFFFF"
+         },
          "data" : [
             [
                "Blog",
@@ -12,52 +47,17 @@
             ],
             [
                "Perl",
-               1764
+               1766
             ],
             [
                "Raku",
                1064
             ]
          ],
-         "dataLabels" : {
-            "rotation" : -90,
-            "enabled" : "true",
-            "color" : "#FFFFFF",
-            "y" : 10,
-            "style" : {
-               "fontSize" : "13px",
-               "fontFamily" : "Verdana, sans-serif"
-            },
-            "align" : "right",
-            "format" : "{point.y:.0f}"
-         }
+         "name" : "Contributions"
       }
    ],
-   "legend" : {
-      "enabled" : "false"
-   },
    "chart" : {
       "type" : "column"
-   },
-   "subtitle" : {
-      "text" : "Last updated at 2020-01-20 02:22:42 GMT"
-   },
-   "yAxis" : {
-      "title" : {
-         "text" : null
-      },
-      "min" : 0
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
-   },
-   "xAxis" : {
-      "labels" : {
-         "style" : {
-            "fontSize" : "13px",
-            "fontFamily" : "Verdana, sans-serif"
-         }
-      },
-      "type" : "category"
    }
 }
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 643b14ff9b..1208e74b6b 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -2,264 +2,11 @@
    "legend" : {
       "enabled" : "false"
    },
-   "plotOptions" : {
-      "series" : {
-         "dataLabels" : {
-            "format" : "{point.y}",
-            "enabled" : 1
-         },
-         "borderWidth" : 0
-      }
-   },
-   "series" : [
-      {
-         "colorByPoint" : "true",
-         "data" : [
-            {
-               "name" : "#001",
-               "drilldown" : "001",
-               "y" : 140
-            },
-            {
-               "name" : "#002",
-               "drilldown" : "002",
-               "y" : 109
-            },
-            {
-               "name" : "#003",
-               "drilldown" : "003",
-               "y" : 71
-            },
-            {
-               "name" : "#004",
-               "drilldown" : "004",
-               "y" : 91
-            },
-            {
-               "name" : "#005",
-               "y" : 71,
-               "drilldown" : "005"
-            },
-            {
-               "y" : 48,
-               "drilldown" : "006",
-               "name" : "#006"
-            },
-            {
-               "y" : 56,
-               "drilldown" : "007",
-               "name" : "#007"
-            },
-            {
-               "drilldown" : "008",
-               "y" : 70,
-               "name" : "#008"
-            },
-            {
-               "name" : "#009",
-               "drilldown" : "009",
-               "y" : 68
-            },
-            {
-               "y" : 60,
-               "drilldown" : "010",
-               "name" : "#010"
-            },
-            {
-               "name" : "#011",
-               "drilldown" : "011",
-               "y" : 79
-            },
-            {
-               "y" : 83,
-               "drilldown" : "012",
-               "name" : "#012"
-            },
-            {
-               "name" : "#013",
-               "drilldown" : "013",
-               "y" : 76
-            },
-            {
-               "name" : "#014",
-               "drilldown" : "014",
-               "y" : 96
-            },
-            {
-               "name" : "#015",
-               "drilldown" : "015",
-               "y" : 93
-            },
-            {
-               "drilldown" : "016",
-               "y" : 66,
-               "name" : "#016"
-            },
-            {
-               "name" : "#017",
-               "y" : 79,
-               "drilldown" : "017"
-            },
-            {
-               "y" : 76,
-               "drilldown" : "018",
-               "name" : "#018"
-            },
-            {
-               "name" : "#019",
-               "y" : 95,
-               "drilldown" : "019"
-            },
-            {
-               "name" : "#020",
-               "y" : 95,
-               "drilldown" : "020"
-            },
-            {
-               "drilldown" : "021",
-               "y" : 67,
-               "name" : "#021"
-            },
-            {
-               "name" : "#022",
-               "y" : 63,
-               "drilldown" : "022"
-            },
-            {
-               "y" : 91,
-               "drilldown" : "023",
-               "name" : "#023"
-            },
-            {
-               "name" : "#024",
-               "y" : 70,
-               "drilldown" : "024"
-            },
-            {
-               "y" : 55,
-               "drilldown" : "025",
-               "name" : "#025"
-            },
-            {
-               "name" : "#026",
-               "y" : 70,
-               "drilldown" : "026"
-            },
-            {
-               "drilldown" : "027",
-               "y" : 58,
-               "name" : "#027"
-            },
-            {
-               "name" : "#028",
-               "y" : 78,
-               "drilldown" : "028"
-            },
-            {
-               "y" : 77,
-               "drilldown" : "029",
-               "name" : "#029"
-            },
-            {
-               "name" : "#030",
-               "drilldown" : "030",
-               "y" : 115
-            },
-            {
-               "name" : "#031",
-               "y" : 87,
-               "drilldown" : "031"
-            },
-            {
-               "y" : 92,
-               "drilldown" : "032",
-               "name" : "#032"
-            },
-            {
-               "y" : 108,
-               "drilldown" : "033",
-               "name" : "#033"
-            },
-            {
-               "name" : "#034",
-               "drilldown" : "034",
-               "y" : 60
-            },
-            {
-               "drilldown" : "035",
-               "y" : 60,
-               "name" : "#035"
-            },
-            {
-               "name" : "#036",
-               "drilldown" : "036",
-               "y" : 61
-            },
-            {
-               "name" : "#037",
-               "drilldown" : "037",
-               "y" : 63
-            },
-            {
-               "name" : "#038",
-               "y" : 60,
-               "drilldown" : "038"
-            },
-            {
-               "name" : "#039",
-               "drilldown" : "039",
-               "y" : 60
-            },
-            {
-               "y" : 66,
-               "drilldown" : "040",
-               "name" : "#040"
-            },
-            {
-               "y" : 68,
-               "drilldown" : "041",
-               "name" : "#041"
-            },
-            {
-               "y" : 86,
-               "drilldown" : "042",
-               "name" : "#042"
-            },
-            {
-               "name" : "#043",
-               "y" : 52,
-               "drilldown" : "043"
-            }
-         ],
-         "name" : "Perl Weekly Challenge Languages"
-      }
-   ],
-   "xAxis" : {
-      "type" : "category"
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge Language"
-   },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Solutions"
-      }
-   },
-   "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-01-20 02:22:42 GMT"
-   },
-   "chart" : {
-      "type" : "column"
-   },
-   "tooltip" : {
-      "headerFormat" : "<span style=\"font-size:11px\"&g