- Added solutions by Kevin Colyer.

12 files changed, 908 insertions, 800 deletions

diff --git a/challenge-041/kevin-colyer/perl6/ch-1.p6 b/challenge-041/kevin-colyer/perl6/ch-1.p6
new file mode 100644
index 0000000000..74971ff37e
--- /dev/null
+++ b/challenge-041/kevin-colyer/perl6/ch-1.p6
@@ -0,0 +1,65 @@
+#!/usr/bin/perl6
+use v6;
+
+use Test;
+
+
+=begin pod
+
+TASK #1
+Write a script to display attractive number between 1 and 50.
+A number is an attractive number if the number of its prime factors is also prime number.
+
+The number 20 is an attractive number, whose prime factors are 2, 2 and 5. The total prime factors is 3 which is also a prime number.
+
+=end pod
+
+# Factorize prime number
+my @primes = lazy (2,3,*+2 ... ∞).grep: *.is-prime;
+
+say "List of Attractive Numbers from 1 to 50";
+say "$_ => "~attractiveNumber($_) for 1..50;
+
+
+
+sub attractiveNumber($n, $verbose=False) {
+    # 0th candidate number not useful
+    # 1st is 2
+    # 2nd is ? not 3 as prime so... start looking for candidates at 4
+    state @aN = 0,2;
+    state $cand=4;
+    say "Seeking {$n}th attractive Number " if $verbose;
+    return @aN[$n] if @aN[$n]; # return the nth attractiveNumber if we have seen it!
+    my $numfactors;
+    loop {
+        if $cand.is-prime { $cand++; next }
+        print "Selecting $cand ..." if $verbose;
+        $numfactors=factors($cand).elems;
+        last if $numfactors.is-prime; # found attractiveNumber so finish
+        say " has $numfactors factors (NOT prime)" if $verbose;
+        $cand++; # keep looking
+    }
+    say " has $numfactors factors (prime)" if $verbose;
+    @aN[$n]=$cand;
+    $cand++; # inc for next time
+    return @aN[$n];
+}
+
+
+sub factors(Int $number) {
+    my @factors;
+    my $n = $number;
+    my $i=0;
+    while $n>1 {
+        my $p=@primes[$i];
+        #say "{$i}th prime is  -> $p";
+        if $n %% $p {
+            @factors.push: $p;
+            $n/=$p;
+            #say "found $p, now n is $n";
+            next
+        };
+        $i++;
+    }
+    @factors;
+}
diff --git a/challenge-041/kevin-colyer/perl6/ch-2.p6 b/challenge-041/kevin-colyer/perl6/ch-2.p6
new file mode 100644
index 0000000000..16d8fc6931
--- /dev/null
+++ b/challenge-041/kevin-colyer/perl6/ch-2.p6
@@ -0,0 +1,28 @@
+#!/usr/bin/perl6
+use v6;
+
+use Test;
+
+
+=begin pod
+
+Write a script to display first 20 Leonardo Numbers. Please checkout wiki page for more information.
+For example:
+
+L(0) = 1
+L(1) = 1
+L(2) = L(0) + L(1) + 1 = 3
+L(3) = L(1) + L(2) + 1 = 5
+and so on.
+
+=end pod
+
+my @cache;
+multi sub Leonardo(Int:D $n where * == 0) { 1 }
+multi sub Leonardo(Int:D $n where * == 1) { 1 }
+multi sub Leonardo(Int:D $n where * > 1 )  {
+   return @cache[$n] if @cache[$n];
+   return @cache[$n] = Leonardo($n-1)+Leonardo($n-2)+1;
+}
+
+say "$_ -> "~Leonardo($_) for ^21;
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 8ca5f77d59..aa9022a939 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,11 +1,134 @@
 {
+   "series" : [
+      {
+         "name" : "Perl Weekly Challenge - 041",
+         "data" : [
+            {
+               "y" : 3,
+               "name" : "Adam Russell",
+               "drilldown" : "Adam Russell"
+            },
+            {
+               "drilldown" : "Andrezgz",
+               "y" : 2,
+               "name" : "Andrezgz"
+            },
+            {
+               "y" : 3,
+               "name" : "Arne Sommer",
+               "drilldown" : "Arne Sommer"
+            },
+            {
+               "drilldown" : "Duncan C. White",
+               "y" : 2,
+               "name" : "Duncan C. White"
+            },
+            {
+               "drilldown" : "E. Choroba",
+               "y" : 2,
+               "name" : "E. Choroba"
+            },
+            {
+               "drilldown" : "Javier Luque",
+               "name" : "Javier Luque",
+               "y" : 5
+            },
+            {
+               "drilldown" : "Jo Christian Oterhals",
+               "name" : "Jo Christian Oterhals",
+               "y" : 2
+            },
+            {
+               "drilldown" : "Kevin Colyer",
+               "name" : "Kevin Colyer",
+               "y" : 2
+            },
+            {
+               "name" : "Kivanc Yazan",
+               "y" : 2,
+               "drilldown" : "Kivanc Yazan"
+            },
+            {
+               "y" : 5,
+               "name" : "Laurent Rosenfeld",
+               "drilldown" : "Laurent Rosenfeld"
+            },
+            {
+               "drilldown" : "Lubos Kolouch",
+               "y" : 2,
+               "name" : "Lubos Kolouch"
+            },
+            {
+               "name" : "Markus Holzer",
+               "y" : 2,
+               "drilldown" : "Markus Holzer"
+            },
+            {
+               "drilldown" : "Noud Aldenhoven",
+               "y" : 2,
+               "name" : "Noud Aldenhoven"
+            },
+            {
+               "name" : "Roger Bell West",
+               "y" : 4,
+               "drilldown" : "Roger Bell West"
+            },
+            {
+               "drilldown" : "Ruben Westerberg",
+               "y" : 4,
+               "name" : "Ruben Westerberg"
+            },
+            {
+               "drilldown" : "Ryan Thompson",
+               "name" : "Ryan Thompson",
+               "y" : 6
+            },
+            {
+               "drilldown" : "Saif Ahmed",
+               "y" : 2,
+               "name" : "Saif Ahmed"
+            },
+            {
+               "y" : 2,
+               "name" : "Simon Proctor",
+               "drilldown" : "Simon Proctor"
+            },
+            {
+               "y" : 1,
+               "name" : "Steven Wilson",
+               "drilldown" : "Steven Wilson"
+            },
+            {
+               "y" : 4,
+               "name" : "Ulrich Rieke",
+               "drilldown" : "Ulrich Rieke"
+            },
+            {
+               "name" : "Walt Mankowski",
+               "y" : 2,
+               "drilldown" : "Walt Mankowski"
+            },
+            {
+               "y" : 2,
+               "name" : "Wanderdoc",
+               "drilldown" : "Wanderdoc"
+            }
+         ],
+         "colorByPoint" : 1
+      }
+   ],
+   "legend" : {
+      "enabled" : 0
+   },
    "chart" : {
       "type" : "column"
    },
+   "xAxis" : {
+      "type" : "category"
+   },
    "drilldown" : {
       "series" : [
          {
-            "id" : "Adam Russell",
             "name" : "Adam Russell",
             "data" : [
                [
@@ -16,17 +139,18 @@
                   "Blog",
                   1
                ]
-            ]
+            ],
+            "id" : "Adam Russell"
          },
          {
+            "id" : "Andrezgz",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "name" : "Andrezgz",
-            "id" : "Andrezgz"
+            "name" : "Andrezgz"
          },
          {
             "data" : [
@@ -39,32 +163,31 @@
                   1
                ]
             ],
-            "name" : "Arne Sommer",
-            "id" : "Arne Sommer"
+            "id" : "Arne Sommer",
+            "name" : "Arne Sommer"
          },
          {
-            "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
                ]
-            ],
-            "name" : "E. Choroba",
-            "id" : "E. Choroba"
+            ]
          },
          {
             "name" : "Javier Luque",
-            "id" : "Javier Luque",
             "data" : [
                [
                   "Perl",
@@ -78,29 +201,42 @@
                   "Blog",
                   1
                ]
-            ]
+            ],
+            "id" : "Javier Luque"
          },
          {
+            "id" : "Jo Christian Oterhals",
             "data" : [
                [
                   "Raku",
                   2
                ]
             ],
-            "name" : "Jo Christian Oterhals",
-            "id" : "Jo Christian Oterhals"
+            "name" : "Jo Christian Oterhals"
          },
          {
+            "name" : "Kevin Colyer",
+            "id" : "Kevin Colyer",
             "data" : [
                [
-                  "Perl",
+                  "Raku",
                   2
                ]
-            ],
+            ]
+         },
+         {
             "name" : "Kivanc Yazan",
-            "id" : "Kivanc Yazan"
+            "id" : "Kivanc Yazan",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
          },
          {
+            "name" : "Laurent Rosenfeld",
+            "id" : "Laurent Rosenfeld",
             "data" : [
                [
                   "Perl",
@@ -114,33 +250,31 @@
                   "Blog",
                   1
                ]
-            ],
-            "name" : "Laurent Rosenfeld",
-            "id" : "Laurent Rosenfeld"
+            ]
          },
          {
+            "id" : "Lubos Kolouch",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Lubos Kolouch",
             "name" : "Lubos Kolouch"
          },
          {
+            "name" : "Markus Holzer",
             "data" : [
                [
                   "Raku",
                   2
                ]
             ],
-            "name" : "Markus Holzer",
             "id" : "Markus Holzer"
          },
          {
-            "id" : "Noud Aldenhoven",
             "name" : "Noud Aldenhoven",
+            "id" : "Noud Aldenhoven",
             "data" : [
                [
                   "Raku",
@@ -149,6 +283,7 @@
             ]
          },
          {
+            "name" : "Roger Bell West",
             "data" : [
                [
                   "Perl",
@@ -159,12 +294,10 @@
                   2
                ]
             ],
-            "name" : "Roger Bell West",
             "id" : "Roger Bell West"
          },
          {
             "id" : "Ruben Westerberg",
-            "name" : "Ruben Westerberg",
             "data" : [
                [
                   "Perl",
@@ -174,9 +307,12 @@
                   "Raku",
                   2
                ]
-            ]
+            ],
+            "name" : "Ruben Westerberg"
          },
          {
+            "name" : "Ryan Thompson",
+            "id" : "Ryan Thompson",
             "data" : [
                [
                   "Perl",
@@ -190,28 +326,26 @@
                   "Blog",
                   2
                ]
-            ],
-            "name" : "Ryan Thompson",
-            "id" : "Ryan Thompson"
+            ]
          },
          {
             "id" : "Saif Ahmed",
-            "name" : "Saif Ahmed",
             "data" : [
                [
                   "Perl",
                   2
                ]
-            ]
+            ],
+            "name" : "Saif Ahmed"
          },
          {
+            "id" : "Simon Proctor",
             "data" : [
                [
                   "Raku",
                   2
                ]
             ],
-            "id" : "Simon Proctor",
             "name" : "Simon Proctor"
          },
          {
@@ -221,10 +355,12 @@
                   1
                ]
             ],
-            "name" : "Steven Wilson",
-            "id" : "Steven Wilson"
+            "id" : "Steven Wilson",
+            "name" : "Steven Wilson"
          },
          {
+            "name" : "Ulrich Rieke",
+            "id" : "Ulrich Rieke",
             "data" : [
                [
                   "Perl",
@@ -234,174 +370,53 @@
                   "Raku",
                   2
                ]
-            ],
-            "id" : "Ulrich Rieke",
-            "name" : "Ulrich Rieke"
+            ]
          },
          {
+            "name" : "Walt Mankowski",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Walt Mankowski",
-            "name" : "Walt Mankowski"
+            "id" : "Walt Mankowski"
          },
          {
+            "id" : "Wanderdoc",
             "data" : [
                [
                   "Perl",
                   2
                ]
             ],
-            "id" : "Wanderdoc",
             "name" : "Wanderdoc"
          }
       ]
    },
-   "series" : [
-      {
-         "colorByPoint" : 1,
-         "data" : [
-            {
-               "drilldown" : "Adam Russell",
-               "y" : 3,
-               "name" : "Adam Russell"
-            },
-            {
-               "y" : 2,
-               "name" : "Andrezgz",
-               "drilldown" : "Andrezgz"
-            },
-            {
-               "drilldown" : "Arne Sommer",
-               "name" : "Arne Sommer",
-               "y" : 3
-            },
-            {
-               "name" : "Duncan C. White",
-               "y" : 2,
-               "drilldown" : "Duncan C. White"
-            },
-            {
-               "drilldown" : "E. Choroba",
-               "y" : 2,
-               "name" : "E. Choroba"
-            },
-            {
-               "y" : 5,
-               "name" : "Javier Luque",
-               "drilldown" : "Javier Luque"
-            },
-            {
-               "drilldown" : "Jo Christian Oterhals",
-               "name" : "Jo Christian Oterhals",
-               "y" : 2
-            },
-            {
-               "drilldown" : "Kivanc Yazan",
-               "name" : "Kivanc Yazan",
-               "y" : 2
-            },
-            {
-               "drilldown" : "Laurent Rosenfeld",
-               "name" : "Laurent Rosenfeld",
-               "y" : 5
-            },
-            {
-               "drilldown" : "Lubos Kolouch",
-               "name" : "Lubos Kolouch",
-               "y" : 2
-            },
-            {
-               "y" : 2,
-               "name" : "Markus Holzer",
-               "drilldown" : "Markus Holzer"
-            },
-            {
-               "y" : 2,
-               "name" : "Noud Aldenhoven",
-               "drilldown" : "Noud Aldenhoven"
-            },
-            {
-               "name" : "Roger Bell West",
-               "y" : 4,
-               "drilldown" : "Roger Bell West"
-            },
-            {
-               "name" : "Ruben Westerberg",
-               "y" : 4,
-               "drilldown" : "Ruben Westerberg"
-            },
-            {
-               "drilldown" : "Ryan Thompson",
-               "name" : "Ryan Thompson",
-               "y" : 6
-            },
-            {
-               "name" : "Saif Ahmed",
-               "y" : 2,
-               "drilldown" : "Saif Ahmed"
-            },
-            {
-               "drilldown" : "Simon Proctor",
-               "name" : "Simon Proctor",
-               "y" : 2
-            },
-            {
-               "drilldown" : "Steven Wilson",
-               "name" : "Steven Wilson",
-               "y" : 1
-            },
-            {
-               "y" : 4,
-               "name" : "Ulrich Rieke",
-               "drilldown" : "Ulrich Rieke"
-            },
-            {
-               "drilldown" : "Walt Mankowski",
-               "y" : 2,
-               "name" : "Walt Mankowski"
-            },
-            {
-               "drilldown" : "Wanderdoc",
-               "name" : "Wanderdoc",
-               "y" : 2
-            }
-         ],
-         "name" : "Perl Weekly Challenge - 041"
-      }
-   ],
    "subtitle" : {
-      "text" : "[Champions: 21] Last updated at 2020-01-05 21:51:46 GMT"
+      "text" : "[Champions: 22] Last updated at 2020-01-05 22:17:53 GMT"
    },
-   "legend" : {
-      "enabled" : 0
+   "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/>"
    },
    "title" : {
       "text" : "Perl Weekly Challenge - 041"
    },
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
    "plotOptions" : {
       "series" : {
          "dataLabels" : {
-            "enabled" : 1,
-            "format" : "{point.y}"
+            "format" : "{point.y}",
+            "enabled" : 1
          },
          "borderWidth" : 0
       }
-   },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Solutions"
-      }
-   },
-   "xAxis" : {
-      "type" : "category"
-   },
-   "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
    }
 }
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 88106d1878..3dd9f0d22c 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,22 +1,36 @@
 {
+   "yAxis" : {
+      "min" : 0,
+      "title" : {
+         "text" : null
+      }
+   },
+   "title" : {
+      "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
+   },
+   "subtitle" : {
+      "text" : "Last updated at 2020-01-05 22:17:53 GMT"
+   },
+   "tooltip" : {
+      "pointFormat" : "<b>{point.y:.0f}</b>"
+   },
+   "xAxis" : {
+      "labels" : {
+         "style" : {
+            "fontSize" : "13px",
+            "fontFamily" : "Verdana, sans-serif"
+         }
+      },
+      "type" : "category"
+   },
    "chart" : {
       "type" : "column"
    },
+   "legend" : {
+      "enabled" : "false"
+   },
    "series" : [
       {
-         "name" : "Contributions",
-         "dataLabels" : {
-            "style" : {
-               "fontSize" : "13px",
-               "fontFamily" : "Verdana, sans-serif"
-            },
-            "format" : "{point.y:.0f}",
-            "enabled" : "true",
-            "y" : 10,
-            "color" : "#FFFFFF",
-            "rotation" : -90,
-            "align" : "right"
-         },
          "data" : [
             [
                "Blog",
@@ -28,36 +42,22 @@
             ],
             [
                "Raku",
-               1014
+               1016
             ]
-         ]
-      }
-   ],
-   "legend" : {
-      "enabled" : "false"
-   },
-   "subtitle" : {
-      "text" : "Last updated at 2020-01-05 21:51:46 GMT"
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
-   },
-   "tooltip" : {
-      "pointFormat" : "<b>{point.y:.0f}</b>"
-   },
-   "xAxis" : {
-      "type" : "category",
-      "labels" : {
-         "style" : {
-            "fontFamily" : "Verdana, sans-serif",
-            "fontSize" : "13px"
-         }
-      }
-   },
-   "yAxis" : {
-      "min" : 0,
-      "title" : {
-         "text" : null
+         ],
+         "dataLabels" : {
+            "rotation" : -90,
+            "align" : "right",
+            "color" : "#FFFFFF",
+            "style" : {
+               "fontFamily" : "Verdana, sans-serif",
+               "fontSize" : "13px"
+            },
+            "enabled" : "true",
+            "format" : "{point.y:.0f}",
+            "y" : 10
+         },
+         "name" : "Contributions"
       }
-   }
+   ]
 }
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 18942904a3..5d2714f651 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -2,37 +2,11 @@
    "xAxis" : {
       "type" : "category"
    },
-   "yAxis" : {
-      "title" : {
-         "text" : "Total Solutions"
-      }
-   },
-   "tooltip" : {
-      "headerFormat" : "<span style=\"font-size:11px\"></span>",
-      "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>",
-      "followPointer" : "true"
-   },
-   "title" : {
-      "text" : "Perl Weekly Challenge Language"
-   },
-   "plotOptions" : {
-      "series" : {
-         "dataLabels" : {
-            "enabled" : 1,
-            "format" : "{point.y}"
-         },
-         "borderWidth" : 0
-      }
-   },
-   "legend" : {
-      "enabled" : "false"
-   },
-   "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-01-05 21:51:46 GMT"
-   },
    "drilldown" : {
       "series" : [
          {
+            "name" : "001",
+            "id" : "001",
             "data" : [
                [
                   "Perl",
@@ -46,12 +20,9 @@
                   "Blog",
                   11
                ]
-            ],
-            "name" : "001",
-            "id" : "001"
+            ]
          },
          {
-            "name" : "002",
             "id" : "002",
             "data" : [
                [
@@ -66,11 +37,11 @@
                   "Blog",
                   10
                ]
-            ]
+            ],
+            "name" : "002"
          },
          {
             "name" : "003",
-            "id" : "003",
             "data" : [
                [
                   "Perl",
@@ -84,7 +55,8 @@
                   "Blog",
                   9
                ]
-            ]
+            ],
+            "id" : "003"
          },
          {
             "data" : [
@@ -105,8 +77,8 @@
             "name" : "004"
          },
          {
-            "id" : "005",
             "name" : "005",
+            "id" : "005",
             "data" : [
                [
                   "Perl",
@@ -123,6 +95,8 @@
             ]
          },
          {
+            "name" : "006",
+            "id" : "006",
             "data" : [
                [
                   "Perl",
@@ -136,12 +110,9 @@
                   "Blog",
                   7
                ]
-            ],
-            "id" : "006",
-            "name" : "006"
+            ]
          },
          {
-            "id" : "007",
             "name" : "007",
             "data" : [
                [
@@ -156,11 +127,11 @@
                   "Blog",
                   10
                ]
-            ]
+            ],
+            "id" : "007"
          },
          {
             "id" : "008",
-            "name" : "008",
             "data" : [
                [
                   "Perl",
@@ -174,11 +145,10 @@
                   "Blog",
                   12
                ]
-            ]
+            ],
+            "name" : "008"
          },
          {
-            "id" : "009",
-            "name" : "009",
             "data" : [
                [
                   "Perl",
@@ -192,7 +162,9 @@
                   "Blog",
                   13
                ]
-            ]
+            ],
+            "id" : "009",
+            "name" : "009"
          },
          {
             "data" : [
@@ -213,6 +185,8 @@
             "name" : "010"
          },
          {
+            "name" : "011",
+            "id" : "011",
             "data" : [
                [
                   "Perl",
@@ -226,9 +200,7 @@
                   "Blog",
                   10
                ]
-            ],
-            "id" : "011",
-            "name" : "011"
+            ]
          },
          {
             "data" : [
@@ -245,12 +217,11 @@
                   11
                ]
             ],
-            "name" : "012",
-            "id" : "012"
+            "id" : "012",
+            "name" : "012"
          },
          {
             "id" : "013",
-            "name" : "013",
             "data" : [
                [
                   "Perl",
@@ -264,9 +235,11 @@
                   "Blog",
                   13
                ]
-            ]
+            ],
+            "name" : "013"
          },
          {
+            "id" : "014",
             "data" : [
                [
                   "Perl",
@@ -281,10 +254,10 @@
                   15
                ]
             ],
-            "id" : "014",
             "name" : "014"
          },
          {
+            "id" : "015",
             "data" : [
                [
                   "Perl",
@@ -299,8 +272,7 @@
                   15
                ]
             ],
-            "name" : "015",
-            "id" : "015"
+            "name" : "015"
          },
          {
             "data" : [
@@ -321,8 +293,8 @@
             "name" : "016"
          },
          {
-            "id" : "017",
             "name" : "017",
+            "id" : "017",
             "data" : [
                [
                   "Perl",
@@ -339,6 +311,7 @@
             ]
          },
          {
+            "name" : "018",
             "data" : [
                [
                   "Perl",
@@ -353,7 +326,6 @@
                   14
                ]
             ],
-            "name" : "018",
             "id" : "018"
          },
          {
@@ -375,8 +347,6 @@
             ]
          },
          {
-            "name" : "020",
-            "id" : "020",
             "data" : [
                [
                   "Perl",
@@ -390,9 +360,12 @@
                   "Blog",
                   13
                ]
-            ]
+            ],
+            "id" : "020",
+            "name" : "020"
          },
          {
+            "id" : "021",
             "data" : [
                [
                   "Perl",
@@ -407,11 +380,9 @@
                   10
                ]
             ],
-            "name" : "021",
-            "id" : "021"
+            "name" : "021"
          },
          {
-            "name" : "022",
             "id" : "022",
             "data" : [
                [
@@ -426,11 +397,12 @@
                   "Blog",
                   10
                ]
-            ]
+            ],
+            "name" : "022"
          },
          {
-            "id" : "023",
             "name" : "023",
+            "id" : "023",
             "data" : [
                [
                   "Perl",
@@ -466,7 +438,6 @@
          },
          {
             "id" : "025",
-            "name" : "025",
             "data" : [
                [
                   "Perl",
@@ -480,9 +451,11 @@
                   "Blog",
                   12
                ]
-            ]
+            ],
+            "name" : "025"
          },
          {
+            "name" : "026",
             "data" : [
                [
                   "Perl",
@@ -497,8 +470,7 @@
                   10
                ]
             ],
-            "id" : "026",
-            "name" : "026"
+            "id" : "026"
          },
          {
             "data" : [
@@ -515,8 +487,8 @@
                   9
                ]
             ],
-            "name" : "027",
-            "id" : "027"
+            "id" : "027",
+            "name" : "027"
          },
          {
             "data" : [
@@ -537,7 +509,6 @@
             "name" : "028"
          },
          {
-            "id" : "029",
             "name" : "029",
             "data" : [
                [
@@ -552,7 +523,8 @@
                   "Blog",
                   12
                ]
-            ]
+            ],
+            "id" : "029"
          },
          {
             "data" : [