diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2019-07-29 16:07:48 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2019-07-29 16:07:48 +0100 |
| commit | d868660e9770a750721ea3379ffe860759e70c43 (patch) | |
| tree | 585f32a8aaa59ec59d024b70b2d3d9be3f64aede | |
| parent | f17339034d069e4f05448a835bc4711c76f65800 (diff) | |
| download | perlweeklychallenge-club-d868660e9770a750721ea3379ffe860759e70c43.tar.gz perlweeklychallenge-club-d868660e9770a750721ea3379ffe860759e70c43.tar.bz2 perlweeklychallenge-club-d868660e9770a750721ea3379ffe860759e70c43.zip | |
- Added solution by Dave Cross.
| -rw-r--r-- | challenge-019/dave-cross/perl5/ch-1.pl | 30 | ||||
| -rw-r--r-- | stats/pwc-current.json | 143 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown-summary.json | 50 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown.json | 338 | ||||
| -rw-r--r-- | stats/pwc-leaders.json | 510 | ||||
| -rw-r--r-- | stats/pwc-summary-1-30.json | 52 | ||||
| -rw-r--r-- | stats/pwc-summary-31-60.json | 30 | ||||
| -rw-r--r-- | stats/pwc-summary-61-90.json | 100 | ||||
| -rw-r--r-- | stats/pwc-summary-91-120.json | 64 | ||||
| -rw-r--r-- | stats/pwc-summary.json | 258 |
10 files changed, 810 insertions, 765 deletions
diff --git a/challenge-019/dave-cross/perl5/ch-1.pl b/challenge-019/dave-cross/perl5/ch-1.pl new file mode 100644 index 0000000000..3ed9f078d8 --- /dev/null +++ b/challenge-019/dave-cross/perl5/ch-1.pl @@ -0,0 +1,30 @@ +#!/usr/bin/perl +# +# Perl Weekly Challenge #19 / Task #1 +# +# Write a script to display months from the year 1900 to 2019 where +# you find 5 weekends i.e. 5 Friday, 5 Saturday and 5 Sunday. + +use strict; +use warnings; +use feature 'say'; + +use Time::Piece; + +# A month can only have five weekends if: +# +# * It has 31 days +# * The 1st of the month is a Friday + +# Array of months with 31 days +my @months = (qw[Jan Mar May Jul Aug Oct Dec]); +my $format = '%Y-%b'; + +for my $y (1900 .. 2019) { + for my $m (@months) { + # Get the first day of the month as a Time::Piece object + my $first = Time::Piece->strptime("$y-$m", $format); + # Print the date if the 1st is a Friday + say $first->strftime('%b %Y') if $first->day eq 'Fri'; + } +} diff --git a/stats/pwc-current.json b/stats/pwc-current.json index 61a6b84836..96702f8840 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -4,62 +4,19 @@ "text" : "Total Solutions" } }, - "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/>" - }, - "xAxis" : { - "type" : "category" - }, - "subtitle" : { - "text" : "[Champions: 5] Last updated at 2019-07-29 13:56:07 GMT" - }, - "title" : { - "text" : "Perl Weekly Challenge - 019" - }, - "series" : [ - { - "colorByPoint" : 1, - "data" : [ - { - "drilldown" : "Lubos Kolouch", - "name" : "Lubos Kolouch", - "y" : 2 - }, - { - "name" : "Mark Anderson", - "y" : 1, - "drilldown" : "Mark Anderson" - }, - { - "y" : 2, - "name" : "Pete Houston", - "drilldown" : "Pete Houston" - }, - { - "drilldown" : "Roger Bell West", - "name" : "Roger Bell West", - "y" : 2 - }, - { - "name" : "Simon Proctor", - "y" : 1, - "drilldown" : "Simon Proctor" - } - ], - "name" : "Perl Weekly Challenge - 019" - } - ], - "chart" : { - "type" : "column" - }, "drilldown" : { "series" : [ { + "data" : [ + [ + "Perl 5", + 1 + ] + ], + "name" : "Dave Cross", + "id" : "Dave Cross" + }, + { "id" : "Lubos Kolouch", "name" : "Lubos Kolouch", "data" : [ @@ -70,34 +27,34 @@ ] }, { + "name" : "Mark Anderson", "id" : "Mark Anderson", "data" : [ [ "Perl 5", 1 ] - ], - "name" : "Mark Anderson" + ] }, { + "name" : "Pete Houston", + "id" : "Pete Houston", "data" : [ [ "Perl 5", 2 ] - ], - "name" : "Pete Houston", - "id" : "Pete Houston" + ] }, { + "name" : "Roger Bell West", + "id" : "Roger Bell West", "data" : [ [ "Perl 5", 2 ] - ], - "name" : "Roger Bell West", - "id" : "Roger Bell West" + ] }, { "data" : [ @@ -113,11 +70,69 @@ }, "plotOptions" : { "series" : { - "borderWidth" : 0, "dataLabels" : { "format" : "{point.y}", "enabled" : 1 - } + }, + "borderWidth" : 0 + } + }, + "legend" : { + "enabled" : 0 + }, + "chart" : { + "type" : "column" + }, + "title" : { + "text" : "Perl Weekly Challenge - 019" + }, + "subtitle" : { + "text" : "[Champions: 6] Last updated at 2019-07-29 15:07:35 GMT" + }, + "xAxis" : { + "type" : "category" + }, + "tooltip" : { + "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>", + "followPointer" : 1, + "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>" + }, + "series" : [ + { + "colorByPoint" : 1, + "data" : [ + { + "y" : 1, + "drilldown" : "Dave Cross", + "name" : "Dave Cross" + }, + { + "drilldown" : "Lubos Kolouch", + "name" : "Lubos Kolouch", + "y" : 2 + }, + { + "name" : "Mark Anderson", + "drilldown" : "Mark Anderson", + "y" : 1 + }, + { + "drilldown" : "Pete Houston", + "name" : "Pete Houston", + "y" : 2 + }, + { + "name" : "Roger Bell West", + "drilldown" : "Roger Bell West", + "y" : 2 + }, + { + "drilldown" : "Simon Proctor", + "name" : "Simon Proctor", + "y" : 1 + } + ], + "name" : "Perl Weekly Challenge - 019" } - } + ] } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index 525f0ee7b7..66894ac43a 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,18 +1,26 @@ { + "yAxis" : { + "title" : { + "text" : null + }, + "min" : 0 + }, + "subtitle" : { + "text" : "Last updated at 2019-07-29 15:07:43 GMT" + }, "series" : [ { - "name" : "Contributions", "dataLabels" : { + "y" : 10, "format" : "{point.y:.0f}", + "align" : "right", "color" : "#FFFFFF", - "style" : { - "fontFamily" : "Verdana, sans-serif", - "fontSize" : "13px" - }, - "y" : 10, + "rotation" : -90, "enabled" : "true", - "align" : "right", - "rotation" : -90 + "style" : { + "fontSize" : "13px", + "fontFamily" : "Verdana, sans-serif" + } }, "data" : [ [ @@ -21,21 +29,28 @@ ], [ "Perl 5", - 756 + 757 ], [ "Perl 6", 440 ] - ] + ], + "name" : "Contributions" } ], + "chart" : { + "type" : "column" + }, "tooltip" : { "pointFormat" : "<b>{point.y:.0f}</b>" }, "legend" : { "enabled" : "false" }, + "title" : { + "text" : "Perl Weekly Challenge Contributions - 2019" + }, "xAxis" : { "type" : "category", "labels" : { @@ -44,20 +59,5 @@ "fontSize" : "13px" } } - }, - "subtitle" : { - "text" : "Last updated at 2019-07-29 13:56:30 GMT" - }, - "yAxis" : { - "min" : 0, - "title" : { - "text" : null - } - }, - "chart" : { - "type" : "column" - }, - "title" : { - "text" : "Perl Weekly Challenge Contributions - 2019" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index 7ca4645a12..02bc6d7339 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,129 +1,9 @@ { - "series" : [ - { - "data" : [ - { - "name" : "#001", - "y" : 123, - "drilldown" : "001" - }, - { - "drilldown" : "002", - "y" : 104, - "name" : "#002" - }, - { - "y" : 66, - "name" : "#003", - "drilldown" : "003" - }, - { - "name" : "#004", - "y" : 84, - "drilldown" : "004" - }, - { - "drilldown" : "005", - "y" : 66, - "name" : "#005" - }, - { - "drilldown" : "006", - "y" : 47, - "name" : "#006" - }, - { - "y" : 54, - "name" : "#007", - "drilldown" : "007" - }, - { - "drilldown" : "008", - "name" : "#008", - "y" : 67 - }, - { - "drilldown" : "009", - "name" : "#009", - "y" : 65 - }, - { - "y" : 58, - "name" : "#010", - "drilldown" : "010" - }, - { - "drilldown" : "011", - "name" : "#011", - "y" : 77 - }, - { - "name" : "#012", - "y" : 81, - "drilldown" : "012" - }, - { - "drilldown" : "013", - "name" : "#013", - "y" : 74 - }, - { - "y" : 94, - "name" : "#014", - "drilldown" : "014" - }, - { - "name" : "#015", - "y" : 90, - "drilldown" : "015" - }, - { - "drilldown" : "016", - "y" : 64, - "name" : "#016" - }, - { - "drilldown" : "017", - "name" : "#017", - "y" : 77 - }, - { - "drilldown" : "018", - "name" : "#018", - "y" : 70 - }, - { - "name" : "#019", - "y" : 8, - "drilldown" : "019" - } - ], - "name" : "Perl Weekly Challenge Languages", - "colorByPoint" : "true" - } - ], - "tooltip" : { - "headerFormat" : "<span style=\"font-size:11px\"></span>", - "followPointer" : "true", - "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>" - }, - "legend" : { - "enabled" : "false" - }, - "plotOptions" : { - "series" : { - "borderWidth" : 0, - "dataLabels" : { - "format" : "{point.y}", - "enabled" : 1 - } - } - }, "drilldown" : { "series" : [ { - "id" : "001", "name" : "001", + "id" : "001", "data" : [ [ "Perl 5", @@ -154,10 +34,11 @@ 9 ] ], - "name" : "002", - "id" : "002" + "id" : "002", + "name" : "002" }, { + "id" : "003", "name" : "003", "data" : [ [ @@ -172,11 +53,9 @@ "Blog", 8 ] - ], - "id" : "003" + ] }, { - "name" : "004", "data" : [ [ "Perl 5", @@ -191,10 +70,10 @@ 9 ] ], + "name" : "004", "id" : "004" }, { - "id" : "005", "data" : [ [ "Perl 5", @@ -209,10 +88,12 @@ 11 ] ], + "id" : "005", "name" : "005" }, { "name" : "006", + "id" : "006", "data" : [ [ "Perl 5", @@ -226,11 +107,9 @@ "Blog", 6 ] - ], - "id" : "006" + ] }, { - "id" : "007", "data" : [ [ "Perl 5", @@ -245,9 +124,12 @@ 8 ] ], + "id" : "007", "name" : "007" }, { + "id" : "008", + "name" : "008", "data" : [ [ "Perl 5", @@ -261,11 +143,10 @@ "Blog", 9 ] - ], - "name" : "008", - "id" : "008" + ] }, { + "name" : "009", "id" : "009", "data" : [ [ @@ -280,10 +161,11 @@ "Blog", 11 ] - ], - "name" : "009" + ] }, { + "id" : "010", + "name" : "010", "data" : [ [ "Perl 5", @@ -297,11 +179,11 @@ "Blog", 9 ] - ], - "name" : "010", - "id" : "010" + ] }, { + "name" : "011", + "id" : "011", "data" : [ [ "Perl 5", @@ -315,11 +197,11 @@ "Blog", 8 ] - ], - "name" : "011", - "id" : "011" + ] }, { + "name" : "012", + "id" : "012", "data" : [ [ "Perl 5", @@ -333,12 +215,11 @@ "Blog", 9 ] - ], - "name" : "012", - "id" : "012" + ] }, { "id" : "013", + "name" : "013", "data" : [ [ "Perl 5", @@ -352,8 +233,7 @@ "Blog", 11 ] - ], - "name" : "013" + ] }, { "data" : [ @@ -370,11 +250,12 @@ 13 ] ], - "name" : "014", - "id" : "014" + "id" : "014", + "name" : "014" }, { "id" : "015", + "name" : "015", "data" : [ [ "Perl 5", @@ -388,8 +269,7 @@ "Blog", 12 ] - ], - "name" : "015" + ] }, { "data" : [ @@ -406,11 +286,10 @@ 10 ] ], - "name" : "016", - "id" : "016" + "id" : "016", + "name" : "016" }, { - "id" : "017", "data" : [ [ "Perl 5", @@ -425,11 +304,10 @@ 10 ] ], + "id" : "017", "name" : "017" }, { - "id" : "018", - "name" : "018", "data" : [ [ "Perl 5", @@ -443,13 +321,17 @@ "Blog", 10 ] - ] + ], + "name" : "018", + "id" : "018" }, { + "name" : "019", + "id" : "019", "data" : [ [ "Perl 5", - 7 + 8 ], [ "Perl 6", @@ -459,27 +341,145 @@ "Blog", 0 ] - ], - "name" : "019", - "id" : "019" + ] } ] }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, - "xAxis" : { - "type" : "category" + "legend" : { + "enabled" : "false" }, - "subtitle" : { - "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-07-29 13:56:30 GMT" + "plotOptions" : { + "series" : { + "borderWidth" : 0, + "dataLabels" : { + "format" : "{point.y}", + "enabled" : 1 + } + } }, "chart" : { "type" : "column" }, + "tooltip" : { + "followPointer" : "true", + "headerFormat" : "<span style=\"font-size:11px\"></span>", + "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>" + }, + "xAxis" : { + "type" : "category" + }, "title" : { "text" : "Perl Weekly Challenge Language" + }, + "series" : [ + { + "name" : "Perl Weekly Challenge Languages", + "colorByPoint" : "true", + "data" : [ + { + "drilldown" : "001", + "name" : "#001", + "y" : 123 + }, + { + "drilldown" : "002", + "y" : 104, + "name" : "#002" + }, + { + "drilldown" : "003", + "y" : 66, + "name" : "#003" + }, + { + "drilldown" : "004", + "name" : "#004", + "y" : 84 + }, + { + "drilldown" : "005", + "y" : 66, + "name" : "#005" + }, + { + "drilldown" : "006", + "name" : "#006", + "y" : 47 + }, + { + "drilldown" : "007", + "name" : "#007", + "y" : 54 + }, + { + "name" : "#008", + "y" : 67, + "drilldown" : "008" + }, + { + "drilldown" : "009", + "name" : "#009", + "y" : 65 + }, + { + "y" : 58, + "name" : "#010", + "drilldown" : "010" + }, + { + "drilldown" : "011", + "name" : "#011", + "y" : 77 + }, + { + "name" : "#012", + "y" : 81, + "drilldown" : "012" + }, + { + "drilldown" : "013", + "y" : 74, + "name" : "#013" + }, + { + "y" : 94, + "name" : "#014", + "drilldown" : "014" + }, + { + "drilldown" : "015", + "y" : 90, + "name" : "#015" + }, + { + "y" : 64, + "name" : "#016", + "drilldown" : "016" + }, + { + "drilldown" : "017", + "name" : "#017", + "y" : 77 + }, + { + "drilldown" : "018", + "name" : "#018", + "y" : 70 + }, + { + "drilldown" : "019", + "name" : "#019", + "y" : 9 + } + ] + } + ], + "subtitle" : { + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-07-29 15:07:43 GMT" + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } } } diff --git a/stats/pwc-leaders.json b/stats/pwc-leaders.json index d72be281e1..44d326459a 100644 --- a/stats/pwc-leaders.json +++ b/stats/pwc-leaders.json @@ -1,17 +1,16 @@ { - "xAxis" : { - "type" : "category" - }, - "title" : { - "text" : "Perl Weekly Challenge Leaders (TOP 50)" + "yAxis" : { + "title" : { + "text" : "Total Score" + } }, "series" : [ { "data" : [ { + "drilldown" : "Joelle Maslak", "name" : "#1: Joelle Maslak", - "y" : 192, - "drilldown" : "Joelle Maslak" + "y" : 192 }, { "name" : "#2: Laurent Rosenfeld", @@ -19,24 +18,24 @@ "drilldown" : "Laurent Rosenfeld" }, { + "drilldown" : "Jaldhar H. Vyas", "name" : "#3: Jaldhar H. Vyas", - "y" : 146, - "drilldown" : "Jaldhar H. Vyas" + "y" : 146 }, { - "name" : "#4: Ruben Westerberg", "y" : 132, + "name" : "#4: Ruben Westerberg", "drilldown" : "Ruben Westerberg" }, { - "drilldown" : "Athanasius", "y" : 114, - "name" : "#5: Athanasius" + "name" : "#5: Athanasius", + "drilldown" : "Athanasius" }, { + "drilldown" : "Adam Russell", "name" : "#6: Adam Russell", - "y" : 110, - "drilldown" : "Adam Russell" + "y" : 110 }, { "drilldown" : "Arne Sommer", @@ -44,9 +43,9 @@ "y" : 100 }, { - "name" : "#8: E. Choroba", + "drilldown" : "E. Choroba", "y" : 86, - "drilldown" : "E. Choroba" + "name" : "#8: E. Choroba" }, { "y" : 82, @@ -60,8 +59,8 @@ }, { "drilldown" : "Kian-Meng Ang", - "name" : "#11: Kian-Meng Ang", - "y" : 80 + "y" : 80, + "name" : "#11: Kian-Meng Ang" }, { "drilldown" : "Dave Jacoby", @@ -69,9 +68,9 @@ "name" : "#12: Dave Jacoby" }, { - "drilldown" : "Yozen Hernandez", + "y" : 70, "name" : "#13: Yozen Hernandez", - "y" : 70 + "drilldown" : "Yozen Hernandez" }, { "y" : 68, @@ -79,14 +78,14 @@ "drilldown" : "Andrezgz" }, { - "y" : 64, + "drilldown" : "Feng Chang", "name" : "#15: Feng Chang", - "drilldown" : "Feng Chang" + "y" : 64 }, { "drilldown" : "Gustavo Chaves", - "name" : "#16: Gustavo Chaves", - "y" : 64 + "y" : 64, + "name" : "#16: Gustavo Chaves" }, { "name" : "#17: Daniel Mantovani", @@ -94,24 +93,24 @@ "drilldown" : "Daniel Mantovani" }, { - "name" : "#18: Duncan C. White", "y" : 60, + "name" : "#18: Duncan C. White", "drilldown" : "Duncan C. White" }, { - "drilldown" : "Steven Wilson", "y" : 56, - "name" : "#19: Steven Wilson" + "name" : "#19: Steven Wilson", + "drilldown" : "Steven Wilson" }, { - "drilldown" : "Jo Christian Oterhals", "y" : 48, - "name" : "#20: Jo Christian Oterhals" + "name" : "#20: Jo Christian Oterhals", + "drilldown" : "Jo Christian Oterhals" }, { "drilldown" : "Dr James A. Smith", - "y" : 44, - "name" : "#21: Dr James A. Smith" + "name" : "#21: Dr James A. Smith", + "y" : 44 }, { "y" : 38, @@ -119,14 +118,14 @@ "drilldown" : "Mark Senn" }, { + "drilldown" : "Ozzy", "name" : "#23: Ozzy", - "y" : 36, - "drilldown" : "Ozzy" + "y" : 36 }, { "drilldown" : "Veesh Goldman", - "y" : 36, - "name" : "#24: Veesh Goldman" + "name" : "#24: Veesh Goldman", + "y" : 36 }, { "drilldown" : "Guillermo Ramos", @@ -135,38 +134,38 @@ }, { "drilldown" : "Nick Logan", - "y" : 32, - "name" : "#26: Nick Logan" + "name" : "#26: Nick Logan", + "y" : 32 }, { "drilldown" : "Kevin Colyer", - "name" : "#27: Kevin Colyer", - "y" : 30 + "y" : 30, + "name" : "#27: Kevin Colyer" }, { "drilldown" : "Lubos Kolouch", - "name" : "#28: Lubos Kolouch", - "y" : 30 + "y" : 30, + "name" : "#28: Lubos Kolouch" }, { + "drilldown" : "Roger Bell West", "name" : "#29: Roger Bell West", - "y" : 30, - "drilldown" : "Roger Bell West" + "y" : 30 }, { - "drilldown" : "Lars Balker", "y" : 28, - "name" : "#30: Lars Balker" + "name" : "#30: Lars Balker", + "drilldown" : "Lars Balker" }, { - "name" : "#31: Maxim Nechaev", + "drilldown" : "Maxim Nechaev", "y" : 24, - "drilldown" : "Maxim Nechaev" + "name" : "#31: Maxim Nechaev" }, { - "drilldown" : "Alicia Bielsa", + "name" : "#32: Alicia Bielsa", "y" : 22, - "name" : "#32: Alicia Bielsa" + "drilldown" : "Alicia Bielsa" }, { "name" : "#33: Doug Schrag", @@ -174,8 +173,8 @@ "drilldown" : "Doug Schrag" }, { - "y" : 20, "name" : "#34: Jaime Corchado", + "y" : 20, "drilldown" : "Jaime Corchado" }, { @@ -194,14 +193,14 @@ "name" : "#37: Neil Bowers" }, { - "drilldown" : "Robert Gratza", "name" : "#38: Robert Gratza", - "y" : 16 + "y" : 16, + "drilldown" : "Robert Gratza" }, { - "y" : 14, + "drilldown" : "John Barrett", "name" : "#39: John Barrett", - "drilldown" : "John Barrett" + "y" : 14 }, { "y" : 14, @@ -209,29 +208,29 @@ "drilldown" : "Khalid" }, { - "name" : "#41: Pete Houston", "y" : 14, + "name" : "#41: Pete Houston", "drilldown" : "Pete Houston" }, { - "drilldown" : "Aaron Sherman", + "name" : "#42: Aaron Sherman", "y" : 12, - "name" : "#42: Aaron Sherman" + "drilldown" : "Aaron Sherman" }, { + "drilldown" : "Donald Hunter", "y" : 12, - "name" : "#43: Donald Hunter", - "drilldown" : "Donald Hunter" + "name" : "#43: Donald Hunter" }, { "drilldown" : "Kivanc Yazan", - "name" : "#44: Kivanc Yazan", - "y" : 12 + "y" : 12, + "name" : "#44: Kivanc Yazan" }, { - "name" : "#45: Maxim Kolodyazhny", |
