diff options
| -rw-r--r-- | challenge-137/mohammad-anwar/perl/ch-1.pl | 54 | ||||
| -rw-r--r-- | stats/pwc-current.json | 173 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown-summary.json | 42 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown.json | 1000 | ||||
| -rw-r--r-- | stats/pwc-leaders.json | 762 | ||||
| -rw-r--r-- | stats/pwc-summary-1-30.json | 46 | ||||
| -rw-r--r-- | stats/pwc-summary-121-150.json | 106 | ||||
| -rw-r--r-- | stats/pwc-summary-151-180.json | 100 | ||||
| -rw-r--r-- | stats/pwc-summary-181-210.json | 122 | ||||
| -rw-r--r-- | stats/pwc-summary-211-240.json | 44 | ||||
| -rw-r--r-- | stats/pwc-summary-241-270.json | 42 | ||||
| -rw-r--r-- | stats/pwc-summary-31-60.json | 50 | ||||
| -rw-r--r-- | stats/pwc-summary-61-90.json | 106 | ||||
| -rw-r--r-- | stats/pwc-summary-91-120.json | 20 | ||||
| -rw-r--r-- | stats/pwc-summary.json | 48 |
15 files changed, 1392 insertions, 1323 deletions
diff --git a/challenge-137/mohammad-anwar/perl/ch-1.pl b/challenge-137/mohammad-anwar/perl/ch-1.pl new file mode 100644 index 0000000000..1b63e3761f --- /dev/null +++ b/challenge-137/mohammad-anwar/perl/ch-1.pl @@ -0,0 +1,54 @@ +#!/usr/bin/perl + +=head1 + +Week 137: + + https://theweeklychallenge.org/blog/perl-weekly-challenge-137 + +Task #1: Long Year + + Write a script to find all the years between 1900 and 2100 which is a Long Year. + +=cut + +use strict; +use warnings; + +use Test::More; +use Date::Calc qw(Week_of_Year Day_of_Week leap_year); + +my $exp = [ + 1903, 1908, 1914, 1920, 1925, + 1931, 1936, 1942, 1948, 1953, + 1959, 1964, 1970, 1976, 1981, + 1987, 1992, 1998, 2004, 2009, + 2015, 2020, 2026, 2032, 2037, + 2043, 2048, 2054, 2060, 2065, + 2071, 2076, 2082, 2088, 2093, + 2099 +]; + +my $got = []; +foreach (1900 .. 2100) { + push @$got, $_ if (is_long_year($_)); +} + +is( join(",", @$exp), join(",", @$got) ); + +done_testing; + +sub is_long_year { + my ($y) = @_; + + return ( + ((Week_of_Year($y, 12, 31))[0] == 53) + && + ( (leap_year($y)) + ? + ((Day_of_Week($y, 1, 1) == 3) || (Day_of_Week($y, 12, 31) == 5)) + : + ((Day_of_Week($y, 1, 1) == 4) || (Day_of_Week($y, 12, 31) == 4)) + ) + ); +} diff --git a/stats/pwc-current.json b/stats/pwc-current.json index 8152ce5896..bda4b6ade8 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -1,73 +1,68 @@ { - "chart" : { - "type" : "column" - }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, - "legend" : { - "enabled" : 0 - }, "series" : [ { "name" : "The Weekly Challenge - 137", + "colorByPoint" : 1, "data" : [ { "name" : "Andrew Shitov", - "drilldown" : "Andrew Shitov", - "y" : 1 + "y" : 1, + "drilldown" : "Andrew Shitov" }, { - "y" : 4, "name" : "Athanasius", + "y" : 4, "drilldown" : "Athanasius" }, { - "y" : 2, "name" : "Bob Lied", + "y" : 2, "drilldown" : "Bob Lied" }, { "name" : "Flavio Poletti", - "drilldown" : "Flavio Poletti", - "y" : 6 + "y" : 6, + "drilldown" : "Flavio Poletti" }, { "name" : "James Smith", - "drilldown" : "James Smith", - "y" : 3 + "y" : 3, + "drilldown" : "James Smith" }, { - "y" : 5, "drilldown" : "Laurent Rosenfeld", + "y" : 5, "name" : "Laurent Rosenfeld" }, { - "drilldown" : "Luca Ferrari", "name" : "Luca Ferrari", + "drilldown" : "Luca Ferrari", "y" : 6 }, { - "drilldown" : "Mark Anderson", "name" : "Mark Anderson", + "drilldown" : "Mark Anderson", "y" : 2 }, { + "y" : 2, "drilldown" : "Matthew Neleigh", - "name" : "Matthew Neleigh", - "y" : 2 + "name" : "Matthew Neleigh" }, { - "y" : 2, + "name" : "Mohammad S Anwar", + "drilldown" : "Mohammad S Anwar", + "y" : 1 + }, + { + "name" : "Niels van Dijke", "drilldown" : "Niels van Dijke", - "name" : "Niels van Dijke" + "y" : 2 }, { "y" : 2, - "name" : "Olivier Delouya", - "drilldown" : "Olivier Delouya" + "drilldown" : "Olivier Delouya", + "name" : "Olivier Delouya" }, { "name" : "Paulo Custodio", @@ -80,9 +75,9 @@ "name" : "Robert DiCicco" }, { + "name" : "Roger Bell_West", "y" : 4, - "drilldown" : "Roger Bell_West", - "name" : "Roger Bell_West" + "drilldown" : "Roger Bell_West" }, { "y" : 3, @@ -95,42 +90,45 @@ "y" : 2 }, { - "drilldown" : "Ulrich Rieke", "name" : "Ulrich Rieke", + "drilldown" : "Ulrich Rieke", "y" : 4 }, { - "drilldown" : "W. Luis Mochan", "name" : "W. Luis Mochan", + "drilldown" : "W. Luis Mochan", "y" : 3 } - ], - "colorByPoint" : 1 + ] } ], - "subtitle" : { - "text" : "[Champions: 18] Last updated at 2021-11-04 12:15:02 GMT" - }, - "xAxis" : { - "type" : "category" - }, - "title" : { - "text" : "The Weekly Challenge - 137" - }, "plotOptions" : { "series" : { + "borderWidth" : 0, "dataLabels" : { "format" : "{point.y}", "enabled" : 1 - }, - "borderWidth" : 0 + } + } + }, + "tooltip" : { + "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/>", + "followPointer" : 1 + }, + "xAxis" : { + "type" : "category" + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" } }, "drilldown" : { "series" : [ { - "name" : "Andrew Shitov", "id" : "Andrew Shitov", + "name" : "Andrew Shitov", "data" : [ [ "Raku", @@ -139,7 +137,6 @@ ] }, { - "name" : "Athanasius", "id" : "Athanasius", "data" : [ [ @@ -150,19 +147,21 @@ "Raku", 2 ] - ] + ], + "name" : "Athanasius" }, { + "id" : "Bob Lied", + "name" : "Bob Lied", "data" : [ [ "Perl", 2 ] - ], - "id" : "Bob Lied", - "name" : "Bob Lied" + ] }, { + "name" : "Flavio Poletti", "data" : [ [ "Perl", @@ -177,12 +176,10 @@ 2 ] ], - "id" : "Flavio Poletti", - "name" : "Flavio Poletti" + "id" : "Flavio Poletti" }, { "id" : "James Smith", - "name" : "James Smith", "data" : [ [ "Perl", @@ -192,7 +189,8 @@ "Blog", 1 ] - ] + ], + "name" : "James Smith" }, { "id" : "Laurent Rosenfeld", @@ -213,7 +211,6 @@ ] }, { - "id" : "Luca Ferrari", "name" : "Luca Ferrari", "data" : [ [ @@ -224,16 +221,17 @@ "Blog", 4 ] - ] + ], + "id" : "Luca Ferrari" }, { + "name" : "Mark Anderson", "data" : [ [ "Raku", 2 ] ], - "name" : "Mark Anderson", "id" : "Mark Anderson" }, { @@ -243,37 +241,47 @@ 2 ] ], - "id" : "Matthew Neleigh", - "name" : "Matthew Neleigh" + "name" : "Matthew Neleigh", + "id" : "Matthew Neleigh" + }, + { + "id" : "Mohammad S Anwar", + "data" : [ + [ + "Perl", + 1 + ] + ], + "name" : "Mohammad S Anwar" }, { - "name" : "Niels van Dijke", "id" : "Niels van Dijke", "data" : [ [ "Perl", 2 ] - ] + ], + "name" : "Niels van Dijke" }, { - "name" : "Olivier Delouya", - "id" : "Olivier Delouya", "data" : [ [ "Perl", 2 ] - ] + ], + "name" : "Olivier Delouya", + "id" : "Olivier Delouya" }, { + "id" : "Paulo Custodio", "data" : [ [ "Perl", 2 ] ], - "id" : "Paulo Custodio", "name" : "Paulo Custodio" }, { @@ -283,10 +291,12 @@ 2 ] ], - "id" : "Robert DiCicco", - "name" : "Robert DiCicco" + "name" : "Robert DiCicco", + "id" : "Robert DiCicco" }, { + "id" : "Roger Bell_West", + "name" : "Roger Bell_West", "data" : [ [ "Perl", @@ -296,9 +306,7 @@ "Raku", 2 ] - ], - "id" : "Roger Bell_West", - "name" : "Roger Bell_West" + ] }, { "data" : [ @@ -316,15 +324,16 @@ }, { "name" : "Steven Wilson", - "id" : "Steven Wilson", "data" : [ [ "Perl", 2 ] - ] + ], + "id" : "Steven Wilson" }, { + "id" : "Ulrich Rieke", "data" : [ [ "Perl", @@ -335,8 +344,7 @@ 2 ] ], - "name" : "Ulrich Rieke", - "id" : "Ulrich Rieke" + "name" : "Ulrich Rieke" }, { "id" : "W. Luis Mochan", @@ -354,9 +362,16 @@ } ] }, - "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/>" + "chart" : { + "type" : "column" + }, + "title" : { + "text" : "The Weekly Challenge - 137" + }, + "legend" : { + "enabled" : 0 + }, + "subtitle" : { + "text" : "[Champions: 19] Last updated at 2021-11-04 14:22:22 GMT" } } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index 82e9a543fd..4db1d296b0 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,20 +1,17 @@ { - "tooltip" : { - "pointFormat" : "<b>{point.y:.0f}</b>" - }, "series" : [ { "dataLabels" : { + "align" : "right", + "rotation" : -90, "format" : "{point.y:.0f}", "enabled" : "true", - "align" : "right", "color" : "#FFFFFF", - "y" : 10, - "rotation" : -90, "style" : { "fontFamily" : "Verdana, sans-serif", "fontSize" : "13px" - } + }, + "y" : 10 }, "name" : "Contributions", "data" : [ @@ -24,7 +21,7 @@ ], [ "Perl", - 6561 + 6562 ], [ "Raku", @@ -33,24 +30,15 @@ ] } ], - "title" : { - "text" : "The Weekly Challenge Contributions [2019 - 2021]" - }, - "xAxis" : { - "type" : "category", - "labels" : { - "style" : { - "fontSize" : "13px", - "fontFamily" : "Verdana, sans-serif" - } - } - }, "subtitle" : { - "text" : "Last updated at 2021-11-04 12:15:02 GMT" + "text" : "Last updated at 2021-11-04 14:22:22 GMT" }, "legend" : { "enabled" : "false" }, + "title" : { + "text" : "The Weekly Challenge Contributions [2019 - 2021]" + }, "chart" : { "type" : "column" }, @@ -59,5 +47,17 @@ "text" : null }, "min" : 0 + }, + "xAxis" : { + "labels" : { + "style" : { + "fontFamily" : "Verdana, sans-serif", + "fontSize" : "13px" + } + }, + "type" : "category" + }, + "tooltip" : { + "pointFormat" : "<b>{point.y:.0f}</b>" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index 3a8c93372f..682d97b423 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,21 +1,12 @@ { - "plotOptions" : { - "series" : { - "dataLabels" : { - "format" : "{point.y}", - "enabled" : 1 - }, - "borderWidth" : 0 - } - }, - "tooltip" : { - "followPointer" : "true", - "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>", - "headerFormat" : "<span style=\"font-size:11px\"></span>" + "chart" : { + "type" : "column" }, "drilldown" : { "series" : [ { + "id" : "001", + "name" : "001", "data" : [ [ "Perl", @@ -29,11 +20,10 @@ "Blog", 11 ] - ], - "name" : "001", - "id" : "001" + ] }, { + "name" : "002", "data" : [ [ "Perl", @@ -48,11 +38,9 @@ 10 ] ], - "name" : "002", "id" : "002" }, { - "name" : "003", "id" : "003", "data" : [ [ @@ -67,11 +55,11 @@ "Blog", 9 ] - ] + ], + "name" : "003" }, { "name" : "004", - "id" : "004", "data" : [ [ "Perl", @@ -85,9 +73,11 @@ "Blog", 10 ] - ] + ], + "id" : "004" }, { + "id" : "005", "data" : [ [ "Perl", @@ -102,10 +92,11 @@ 12 ] ], - "id" : "005", "name" : "005" }, { + "id" : "006", + "name" : "006", "data" : [ [ "Perl", @@ -119,13 +110,9 @@ "Blog", 7 ] - ], - "id" : "006", - "name" : "006" + ] }, { - "id" : "007", - "name" : "007", "data" : [ [ "Perl", @@ -139,11 +126,13 @@ "Blog", 10 ] - ] + ], + "name" : "007", + "id" : "007" }, { - "name" : "008", "id" : "008", + "name" : "008", "data" : [ [ "Perl", @@ -160,6 +149,7 @@ ] }, { + "name" : "009", "data" : [ [ "Perl", @@ -174,11 +164,9 @@ 13 ] ], - "id" : "009", - "name" : "009" + "id" : "009" }, { - "name" : "010", "id" : "010", "data" : [ [ @@ -193,10 +181,10 @@ "Blog", 11 ] - ] + ], + "name" : "010" }, { - "id" : "011", "name" : "011", "data" : [ [ @@ -211,7 +199,8 @@ "Blog", 10 ] - ] + ], + "id" : "011" }, { "data" : [ @@ -228,12 +217,10 @@ 11 ] ], - "id" : "012", - "name" : "012" + "name" : "012", + "id" : "012" }, { - "id" : "013", - "name" : "013", "data" : [ [ "Perl", @@ -247,11 +234,12 @@ "Blog", 13 ] - ] + ], + "name" : "013", + "id" : "013" }, { "name" : "014", - "id" : "014", "data" : [ [ "Perl", @@ -265,9 +253,11 @@ "Blog", 15 ] - ] + ], + "id" : "014" }, { + "name" : "015", "data" : [ [ "Perl", @@ -282,8 +272,7 @@ 15 ] ], - "id" : "015", - "name" : "015" + "id" : "015" }, { "data" : [ @@ -300,12 +289,10 @@ 12 ] ], - "id" : "016", - "name" : "016" + "name" : "016", + "id" : "016" }, { - "id" : "017", - "name" : "017", "data" : [ [ "Perl", @@ -319,11 +306,11 @@ "Blog", 12 ] - ] + ], + "name" : "017", + "id" : "017" }, { - "id" : "018", - "name" : "018", "data" : [ [ "Perl", @@ -337,9 +324,13 @@ "Blog", 14 ] - ] + ], + "name" : "018", + "id" : "018" }, { + "id" : "019", + "name" : "019", "data" : [ [ "Perl", @@ -353,11 +344,11 @@ "Blog", 13 ] - ], - "name" : "019", - "id" : "019" + ] }, { + "id" : "020", + "name" : "020", "data" : [ [ "Perl", @@ -371,11 +362,10 @@ "Blog", 13 ] - ], - "name" : "020", - "id" : "020" + ] }, { + "name" : "021", "data" : [ [ "Perl", @@ -390,11 +380,9 @@ 10 ] ], - "id" : "021", - "name" : "021" + "id" : "021" }, { - "name" : "022", "id" : "022", "data" : [ [ @@ -409,10 +397,10 @@ "Blog", 10 ] - ] + ], + "name" : "022" }, { - "name" : "023", "id" : "023", "data" : [ [ @@ -427,9 +415,12 @@ "Blog", 12 ] - ] + ], + "name" : "023" }, { + "id" : "024", + "name" : "024", "data" : [ [ "Perl", @@ -443,9 +434,7 @@ "Blog", 11 ] - ], - "id" : "024", - "name" : "024" + ] }, { "data" : [ @@ -466,7 +455,6 @@ "id" : "025" }, { - "id" : "026", "name" : "026", "data" : [ [ @@ -481,11 +469,12 @@ "Blog", 10 ] - ] + ], + "id" : "026" }, { - "name" : "027", "id" : "027", + "name" : "027", "data" : [ [ "Perl", @@ -502,6 +491,7 @@ ] }, { + "name" : "028", "data" : [ [ "Perl", @@ -516,8 +506,7 @@ 9 ] ], - "id" : "028", - "name" : "028" + "id" : "028" }, { "id" : "029", @@ -556,7 +545,6 @@ ] }, { - "name" : "031", "id" : "031", "data" : [ [ @@ -571,11 +559,12 @@ "Blog", 9 ] - ] + ], + "name" : "031" }, { - "name" : "032", "id" : "032", + "name" : "032", "data" : [ [ "Perl", @@ -592,8 +581,8 @@ ] }, { - "name" : "033", "id" : "033", + "name" : "033", "data" : [ [ "Perl", @@ -610,6 +599,7 @@ ] }, { + "name" : "034", "data" : [ [ "Perl", @@ -624,12 +614,10 @@ 11 ] ], - "id" : "034", - "name" : "034" + "id" : "034" }, { "name" : "035", - "id" : "035", "data" : [ [ "Perl", @@ -643,9 +631,11 @@ "Blog", 9 ] - ] + ], + "id" : "035" }, { + "id" : "036", "data" : [ [ "Perl", @@ -660,12 +650,10 @@ 11 ] ], - "id" : "036", "name" : "036" }, { "name" : "037", - "id" : "037", "data" : [ [ "Perl", @@ -679,11 +667,10 @@ "Blog", 9 ] - ] + ], + "id" : "037" }, { - "id" : "038", - "name" : "038", "data" : [ [ "Perl", @@ -697,10 +684,11 @@ "Blog", 12 ] - ] + ], + "name" : "038", + "id" : "038" }, { - "id" : "039", "name" : "039", "data" : [ [ @@ -715,9 +703,11 @@ "Blog", 12 ] - ] + ], + "id" : "039" }, { + "id" : "040", "data" : [ [ "Perl", @@ -732,12 +722,10 @@ 10 ] ], - "id" : "040", "name" : "040" }, { "name" : "041", - "id" : "041", "data" : [ [ "Perl", @@ -751,11 +739,11 @@ "Blog", 9 ] - ] + ], + "id" : "041" }, { "id" : "042", - "name" : "042", "data" : [ [ "Perl", @@ -769,11 +757,12 @@ "Blog", 11 ] - ] + ], + "name" : "042" }, { - "name" : "043", "id" : "043", + "name" : "043", "data" : [ [ "Perl", @@ -808,7 +797,6 @@ "id" : "044" }, { - "id" : "045", "name" : "045", "data" : [ [ @@ -823,9 +811,12 @@ "Blog", 11 ] - ] + ], + "id" : "045" }, { + "id" : "046", + "name" : "046", "data" : [ [ "Perl", @@ -839,12 +830,9 @@ "Blog", 10 ] - ], - "name" : "046", - "id" : "046" + ] }, { - "id" : "047", "name" : "047", "data" : [ [ @@ -859,11 +847,10 @@ "Blog", 10 ] - ] + ], + "id" : "047" }, { - "name" : "048", - "id" : "048", "data" : [ [ "Perl", @@ -877,10 +864,11 @@ "Blog", 12 ] - ] + ], + "name" : "048", + "id" : "048" }, { - "id" : "049", "name" : "049", "data" : [ [ @@ -895,11 +883,10 @@ "Blog", 12 ] - ] + ], + "id" : "049" }, { - "name" : "050", - "id" : "050", "data" : [ [ "Perl", @@ -913,9 +900,13 @@ "Blog", 12 ] - ] + ], + "name" : "050", + "id" : "050" }, { + "id" : "051", + "name" : "051", "data" : [ [ "Perl", @@ -929,11 +920,10 @@ "Blog", |
