diff options
24 files changed, 80 insertions, 34 deletions
diff --git a/challenge-340/mohammad-anwar/perl/ch-1.pl b/challenge-340/mohammad-anwar/perl/ch-1.pl new file mode 100644 index 0000000000..a4fb1be1a8 --- /dev/null +++ b/challenge-340/mohammad-anwar/perl/ch-1.pl @@ -0,0 +1,31 @@ +#!/usr/bin/env perl + +use v5.38; +use Test::More; + +my $examples = { + 1 => { str => 'abbaca', exp => 'ca' }, + 2 => { str => 'azxxzy', exp => 'ay' }, + 3 => { str => 'aaaaaaaa', exp => '' }, + 4 => { str => 'aabccba', exp => 'a' }, + 5 => { str => 'abcddcba', exp => '' }, +}; + +foreach my $id (keys %$examples) { + is(remove_duplicates($examples->{$id}->{str}), $examples->{$id}->{exp}) +} + +done_testing; + +sub remove_duplicates($str) { + return $str if length($str) < 2; + + for (my $i = 0; $i < length($str) - 1; $i++) { + if (substr($str, $i, 1) eq substr($str, $i + 1, 1)) { + my $new_str = substr($str, 0, $i) . substr($str, $i + 2); + return remove_duplicates($new_str); + } + } + + return $str; +} diff --git a/stats/pwc-current.json b/stats/pwc-current.json index 3a19d4ea74..e2dfa1b980 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -88,6 +88,16 @@ "data" : [ [ "Perl", + 1 + ] + ], + "id" : "Mohammad Sajid Anwar", + "name" : "Mohammad Sajid Anwar" + }, + { + "data" : [ + [ + "Perl", 2 ] ], @@ -229,6 +239,11 @@ "y" : 2 }, { + "drilldown" : "Mohammad Sajid Anwar", + "name" : "Mohammad Sajid Anwar", + "y" : 1 + }, + { "drilldown" : "Niels van Dijke", "name" : "Niels van Dijke", "y" : 2 @@ -268,7 +283,7 @@ } ], "subtitle" : { - "text" : "[Champions: 15] Last updated at 2025-09-22 23:07:20 GMT" + "text" : "[Champions: 16] Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge - 340" diff --git a/stats/pwc-language-breakdown-2019.json b/stats/pwc-language-breakdown-2019.json index 58d553c29a..420f9d73b1 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-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-2020.json b/stats/pwc-language-breakdown-2020.json index 9d0dc31b00..016a01c644 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-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-2021.json b/stats/pwc-language-breakdown-2021.json index 4f9e4b4f7b..281784bbdb 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-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-2022.json b/stats/pwc-language-breakdown-2022.json index 5707c59da8..e2063f9a4c 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-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-2023.json b/stats/pwc-language-breakdown-2023.json index 8a88b443b3..58fdc66817 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-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-2024.json b/stats/pwc-language-breakdown-2024.json index eb21b79719..c94c52c6f1 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-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-2025.json b/stats/pwc-language-breakdown-2025.json index 3a73acf172..87f530f04d 100644 --- a/stats/pwc-language-breakdown-2025.json +++ b/stats/pwc-language-breakdown-2025.json @@ -8,7 +8,7 @@ "data" : [ [ "Perl", - 22 + 23 ], [ "Raku", @@ -709,7 +709,7 @@ { "drilldown" : "340", "name" : "340", - "y" : 36 + "y" : 37 }, { "drilldown" : "339", @@ -901,7 +901,7 @@ } ], "subtitle" : { - "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index b35feccbcb..3fb1bb3a4c 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -10,7 +10,7 @@ "data" : [ [ "Perl", - 17506 + 17507 ], [ "Raku", @@ -37,7 +37,7 @@ } ], "subtitle" : { - "text" : "Last updated at 2025-09-22 23:07:20 GMT" + "text" : "Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Contributions [2019 - 2025]" diff --git a/stats/pwc-leaders.json b/stats/pwc-leaders.json index 5fd463a1b7..47122c031d 100644 --- a/stats/pwc-leaders.json +++ b/stats/pwc-leaders.json @@ -480,7 +480,7 @@ "data" : [ [ "Perl", - 172 + 173 ], [ "Raku", @@ -947,7 +947,7 @@ { "drilldown" : "Mohammad Sajid Anwar", "name" : "31: Mohammad Sajid Anwar", - "y" : 720 + "y" : 722 }, { "drilldown" : "Wanderdoc", @@ -1049,7 +1049,7 @@ } ], "subtitle" : { - "text" : "Click the columns to drilldown the score breakdown. Last updated at 2025-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the score breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "Team Leaders (TOP 50)" diff --git a/stats/pwc-summary-1-30.json b/stats/pwc-summary-1-30.json index 7736f01614..4dbe4145e5 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 d5db4730fc..74f4915a96 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 8189b40956..1415caecfc 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 2ab81a437b..77e48d7507 100644 --- a/stats/pwc-summary-181-210.json +++ b/stats/pwc-summary-181-210.json @@ -28,7 +28,7 @@ 0, 0, 1, - 172, + 173, 0, 0, 40, @@ -115,7 +115,7 @@ } ], "subtitle" : { - "text" : "[Champions: 30] Last updated at 2025-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 1152bcdfb9..b5fc9d95c5 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 21f058bd80..d8bc445cf9 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 688eb446bd..d88b89fe39 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 77acce8b0b..a8c1592339 100644 --- a/stats/pwc-summary-301-330.json +++ b/stats/pwc-summary-301-330.json @@ -109,7 +109,7 @@ } ], "subtitle" : { - "text" : "[Champions: 28] Last updated at 2025-09-22 23:07:20 GMT" + "text" : "[Champions: 28] Last updated at 2025-09-22 23:21:00 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 3adcd4a1de..1d0f510772 100644 --- a/stats/pwc-summary-31-60.json +++ b/stats/pwc-summary-31-60.json @@ -69,8 +69,8 @@ 9, 0, 0, - 2, 17, + 2, 0, 194, 0, @@ -115,7 +115,7 @@ } ], "subtitle" : { - "text" : "[Champions: 30] Last updated at 2025-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 957cb17925..2d49115a44 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 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 25c20c2a7f..01452b6247 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-09-22 23:07:20 GMT" + "text" : "[Champions: 30] Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge [2019 - 2025]" diff --git a/stats/pwc-summary.json b/stats/pwc-summary.json index ef57db6c1d..bec0eb8813 100644 --- a/stats/pwc-summary.json +++ b/stats/pwc-summary.json @@ -208,7 +208,7 @@ 0, 0, 1, - 106, + 107, 0, 0, 20, @@ -397,8 +397,8 @@ 6, 0, 0, - 9, 1, + 9, 0, 104, 0, @@ -1009,7 +1009,7 @@ } ], "subtitle" : { - "text" : "[Champions: 328] Last updated at 2025-09-22 23:07:20 GMT" + "text" : "[Champions: 328] Last updated at 2025-09-22 23:21:00 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 7f58cecb05..55b3a08007 100644 --- a/stats/pwc-yearly-language-summary.json +++ b/stats/pwc-yearly-language-summary.json @@ -8,7 +8,7 @@ "data" : [ [ "Perl", - 1735 + 1736 ], [ "Raku", @@ -151,7 +151,7 @@ { "drilldown" : "2025", "name" : "2025", - "y" : 3279 + "y" : 3280 }, { "drilldown" : "2024", @@ -188,7 +188,7 @@ } ], "subtitle" : { - "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:07:20 GMT" + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2025-09-22 23:21:00 GMT" }, "title" : { "text" : "The Weekly Challenge Language" |