- Added solutions by Torgny Lyon.

24 files changed, 56 insertions, 37 deletions

diff --git a/challenge-341/mohammad-anwar/perl/ch-1.pl b/challenge-341/mohammad-anwar/perl/ch-1.pl
index 7ca576e264..32a82da04d 100644
--- a/challenge-341/mohammad-anwar/perl/ch-1.pl
+++ b/challenge-341/mohammad-anwar/perl/ch-1.pl
@@ -8,7 +8,7 @@ sub typable_word_count($str, $keys) {
     return scalar @words unless @$keys;
 
     my $broken_chars = quotemeta(join '', @$keys);
-    return scalar grep { !/[$broken_chars]/i } split /\s+/, $str;
+    return scalar grep { !/[$broken_chars]/i } @words;
 }
 
 my $examples = [
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index c9eed7f9e8..d10d856a20 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -233,6 +233,20 @@
                   2
                ],
                [
+                  "Blog",
+                  1
+               ]
+            ],
+            "id" : "Torgny Lyon",
+            "name" : "Torgny Lyon"
+         },
+         {
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
                   "Raku",
                   2
                ]
@@ -368,6 +382,11 @@
                "y" : 4
             },
             {
+               "drilldown" : "Torgny Lyon",
+               "name" : "Torgny Lyon",
+               "y" : 3
+            },
+            {
                "drilldown" : "Ulrich Rieke",
                "name" : "Ulrich Rieke",
                "y" : 4
@@ -382,7 +401,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 21] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 22] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge - 341"
diff --git a/stats/pwc-language-breakdown-2019.json b/stats/pwc-language-breakdown-2019.json
index 3f5f72f485..80ee93c854 100644
--- a/stats/pwc-language-breakdown-2019.json
+++ b/stats/pwc-language-breakdown-2019.json
@@ -970,7 +970,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-2020.json b/stats/pwc-language-breakdown-2020.json
index fab5839e23..d7d584d825 100644
--- a/stats/pwc-language-breakdown-2020.json
+++ b/stats/pwc-language-breakdown-2020.json
@@ -1223,7 +1223,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-2021.json b/stats/pwc-language-breakdown-2021.json
index 3e061d4fe7..d4fe8da6b3 100644
--- a/stats/pwc-language-breakdown-2021.json
+++ b/stats/pwc-language-breakdown-2021.json
@@ -1223,7 +1223,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-2022.json b/stats/pwc-language-breakdown-2022.json
index bb06a0adfd..cf1b4928ed 100644
--- a/stats/pwc-language-breakdown-2022.json
+++ b/stats/pwc-language-breakdown-2022.json
@@ -1223,7 +1223,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-2023.json b/stats/pwc-language-breakdown-2023.json
index 9613918a1f..7ea4684d78 100644
--- a/stats/pwc-language-breakdown-2023.json
+++ b/stats/pwc-language-breakdown-2023.json
@@ -1200,7 +1200,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-2024.json b/stats/pwc-language-breakdown-2024.json
index e75bd03b0c..e866560e4b 100644
--- a/stats/pwc-language-breakdown-2024.json
+++ b/stats/pwc-language-breakdown-2024.json
@@ -1246,7 +1246,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-2025.json b/stats/pwc-language-breakdown-2025.json
index 88bdd3ddd7..327cc1290c 100644
--- a/stats/pwc-language-breakdown-2025.json
+++ b/stats/pwc-language-breakdown-2025.json
@@ -8,7 +8,7 @@
             "data" : [
                [
                   "Perl",
-                  35
+                  37
                ],
                [
                   "Raku",
@@ -16,7 +16,7 @@
                ],
                [
                   "Blog",
-                  6
+                  7
                ]
             ],
             "id" : "341",
@@ -727,7 +727,7 @@
             {
                "drilldown" : "341",
                "name" : "341",
-               "y" : 55
+               "y" : 58
             },
             {
                "drilldown" : "340",
@@ -924,7 +924,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 8e3d1e637c..8476471341 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -10,7 +10,7 @@
          "data" : [
             [
                "Perl",
-               17570
+               17572
             ],
             [
                "Raku",
@@ -18,7 +18,7 @@
             ],
             [
                "Blog",
-               6291
+               6292
             ]
          ],
          "dataLabels" : {
@@ -37,7 +37,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Contributions [2019 - 2025]"
diff --git a/stats/pwc-leaders.json b/stats/pwc-leaders.json
index d53d289663..f661f3c8ec 100644
--- a/stats/pwc-leaders.json
+++ b/stats/pwc-leaders.json
@@ -1049,7 +1049,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the score breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the score breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "Team Leaders (TOP 50)"
diff --git a/stats/pwc-summary-1-30.json b/stats/pwc-summary-1-30.json
index d650b906ca..0c25fedebe 100644
--- a/stats/pwc-summary-1-30.json
+++ b/stats/pwc-summary-1-30.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-121-150.json b/stats/pwc-summary-121-150.json
index 6ad6d8f418..f6f30c17aa 100644
--- a/stats/pwc-summary-121-150.json
+++ b/stats/pwc-summary-121-150.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-151-180.json b/stats/pwc-summary-151-180.json
index 651323680e..b977674b4f 100644
--- a/stats/pwc-summary-151-180.json
+++ b/stats/pwc-summary-151-180.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-181-210.json b/stats/pwc-summary-181-210.json
index 01aa859781..29cf778301 100644
--- a/stats/pwc-summary-181-210.json
+++ b/stats/pwc-summary-181-210.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-211-240.json b/stats/pwc-summary-211-240.json
index cccb0bee89..112386b23c 100644
--- a/stats/pwc-summary-211-240.json
+++ b/stats/pwc-summary-211-240.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-241-270.json b/stats/pwc-summary-241-270.json
index 7d3ec0db21..da4152a7f9 100644
--- a/stats/pwc-summary-241-270.json
+++ b/stats/pwc-summary-241-270.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-271-300.json b/stats/pwc-summary-271-300.json
index 7212d6f2df..8a42894977 100644
--- a/stats/pwc-summary-271-300.json
+++ b/stats/pwc-summary-271-300.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-301-330.json b/stats/pwc-summary-301-330.json
index b0230129bc..84414bc962 100644
--- a/stats/pwc-summary-301-330.json
+++ b/stats/pwc-summary-301-330.json
@@ -15,7 +15,7 @@
             0,
             6,
             2,
-            18,
+            20,
             5,
             8,
             0,
@@ -81,7 +81,7 @@
             0,
             0,
             0,
-            6,
+            7,
             0,
             0,
             0,
@@ -109,7 +109,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 28] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 28] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-31-60.json b/stats/pwc-summary-31-60.json
index 82a3c931f1..3b3cf589dd 100644
--- a/stats/pwc-summary-31-60.json
+++ b/stats/pwc-summary-31-60.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-61-90.json b/stats/pwc-summary-61-90.json
index 8624b58af2..0b53a031f4 100644
--- a/stats/pwc-summary-61-90.json
+++ b/stats/pwc-summary-61-90.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary-91-120.json b/stats/pwc-summary-91-120.json
index 9d9a38fb95..6741c3f234 100644
--- a/stats/pwc-summary-91-120.json
+++ b/stats/pwc-summary-91-120.json
@@ -115,7 +115,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 30] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 30] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-summary.json b/stats/pwc-summary.json
index 2239980297..19cc3d1a0f 100644
--- a/stats/pwc-summary.json
+++ b/stats/pwc-summary.json
@@ -315,7 +315,7 @@
             0,
             3,
             1,
-            9,
+            10,
             3,
             4,
             0,
@@ -397,8 +397,8 @@
             6,
             0,
             0,
-            1,
             9,
+            1,
             0,
             104,
             0,
@@ -981,7 +981,7 @@
             0,
             0,
             0,
-            6,
+            7,
             0,
             0,
             0,
@@ -1009,7 +1009,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "[Champions: 328] Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "[Champions: 328] Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge [2019 - 2025]"
diff --git a/stats/pwc-yearly-language-summary.json b/stats/pwc-yearly-language-summary.json
index 3135c00e90..e4341b6b57 100644
--- a/stats/pwc-yearly-language-summary.json
+++ b/stats/pwc-yearly-language-summary.json
@@ -8,7 +8,7 @@
             "data" : [
                [
                   "Perl",
-                  1799
+                  1801
                ],
                [
                   "Raku",
@@ -16,7 +16,7 @@
                ],
                [
                   "Blog",
-                  704
+                  705
                ]
             ],
             "id" : "2025",
@@ -151,7 +151,7 @@
             {
                "drilldown" : "2025",
                "name" : "2025",
-               "y" : 3392
+               "y" : 3395
             },
             {
                "drilldown" : "2024",
@@ -188,7 +188,7 @@
       }
    ],
    "subtitle" : {
-      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 17:54:26 GMT"
+      "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-10-01 22:24:59 GMT"
    },
    "title" : {
       "text" : "The Weekly Challenge Language"