aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--challenge-013/pete-houston/perl5/ch-1.pl53
-rw-r--r--stats/pwc-current.json69
-rw-r--r--stats/pwc-language-breakdown-summary.json72
-rw-r--r--stats/pwc-language-breakdown.json250
-rw-r--r--stats/pwc-leaders.json518
-rw-r--r--stats/pwc-summary-1-30.json46
-rw-r--r--stats/pwc-summary-31-60.json44
-rw-r--r--stats/pwc-summary-61-90.json56
-rw-r--r--stats/pwc-summary-91-120.json64
-rw-r--r--stats/pwc-summary.json240
10 files changed, 740 insertions, 672 deletions
diff --git a/challenge-013/pete-houston/perl5/ch-1.pl b/challenge-013/pete-houston/perl5/ch-1.pl
new file mode 100644
index 0000000000..f9915c59e7
--- /dev/null
+++ b/challenge-013/pete-houston/perl5/ch-1.pl
@@ -0,0 +1,53 @@
+#!/usr/bin/env perl
+#===============================================================================
+#
+# FILE: friday.pl
+#
+# USAGE: ./friday.pl [ YEAR ]
+#
+# DESCRIPTION: Given a year as argument prints a chronological list of
+# the last Fridays in each month of that year. Defaults to current year
+# if argument is missing or invalid
+#
+#===============================================================================
+
+use strict;
+use warnings;
+
+use Time::Piece;
+use Time::Seconds;
+
+my $year = get_year ();
+
+for my $mon (1..12) {
+ print last_friday($year, $mon) . "\n";
+}
+
+sub get_year {
+ my $year = shift @ARGV;
+ if (defined $year) {
+ if ($year =~ /^(\d{4})$/) {
+ if ($year > 1969 && $year < 2039) {
+ return $1;
+ } else {
+ warn "Year $year outside acceptable range 1970-2038\n";
+ }
+ } else {
+ warn "The supplied year ($year) is invalid. Using current year\n";
+ }
+ } else {
+ warn "No year supplied. Using current year\n";
+ }
+ return localtime(time)->year;
+}
+
+sub last_friday {
+ my ($year, $mon) = @_;
+ my $first = sprintf "%i-%2.2i-01", $year, $mon;
+ my $day = Time::Piece->strptime ($first, "%Y-%m-%d");
+ $day += ONE_DAY * ($day->month_last_day - 1);
+
+ while ($day->day_of_week != 5) { $day -= ONE_DAY }
+ return $day->ymd;
+}
+
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 6ced4bba5e..8348040344 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -2,45 +2,47 @@
"drilldown" : {
"series" : [
{
- "name" : "Joelle Maslak",
+ "id" : "Joelle Maslak",
"data" : [
[
"Perl 6",
1
]
],
- "id" : "Joelle Maslak"
+ "name" : "Joelle Maslak"
},
{
- "id" : "Kevin Colyer",
"data" : [
[
"Perl 6",
2
]
],
- "name" : "Kevin Colyer"
+ "name" : "Kevin Colyer",
+ "id" : "Kevin Colyer"
},
{
+ "name" : "Pete Houston",
"data" : [
[
- "Perl 6",
+ "Perl 5",
1
]
],
+ "id" : "Pete Houston"
+ },
+ {
"name" : "Simon Proctor",
+ "data" : [
+ [
+ "Perl 6",
+ 1
+ ]
+ ],
"id" : "Simon Proctor"
}
]
},
- "yAxis" : {
- "title" : {
- "text" : "Total Solutions"
- }
- },
- "legend" : {
- "enabled" : 0
- },
"title" : {
"text" : "Perl Weekly Challenge - 013"
},
@@ -53,16 +55,16 @@
}
}
},
- "chart" : {
- "type" : "column"
+ "legend" : {
+ "enabled" : 0
},
- "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/>"
+ "yAxis" : {
+ "title" : {
+ "text" : "Total Solutions"
+ }
},
- "xAxis" : {
- "type" : "category"
+ "subtitle" : {
+ "text" : "[Champions: 4] Last updated at 2019-06-17 16:15:37 GMT"
},
"series" : [
{
@@ -70,14 +72,19 @@
"name" : "Perl Weekly Challenge - 013",
"data" : [
{
+ "drilldown" : "Joelle Maslak",
"name" : "Joelle Maslak",
- "y" : 1,
- "drilldown" : "Joelle Maslak"
+ "y" : 1
},
{
"drilldown" : "Kevin Colyer",
- "y" : 2,
- "name" : "Kevin Colyer"
+ "name" : "Kevin Colyer",
+ "y" : 2
+ },
+ {
+ "drilldown" : "Pete Houston",
+ "name" : "Pete Houston",
+ "y" : 1
},
{
"drilldown" : "Simon Proctor",
@@ -87,7 +94,15 @@
]
}
],
- "subtitle" : {
- "text" : "[Champions: 3] Last updated at 2019-06-17 14:03:09 GMT"
+ "xAxis" : {
+ "type" : "category"
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "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/>"
}
}
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 61528e7709..1d62c35d7f 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,34 +1,4 @@
{
- "xAxis" : {
- "type" : "category",
- "labels" : {
- "style" : {
- "fontFamily" : "Verdana, sans-serif",
- "fontSize" : "13px"
- }
- }
- },
- "yAxis" : {
- "title" : {
- "text" : null
- },
- "min" : 0
- },
- "subtitle" : {
- "text" : "Last updated at 2019-06-17 14:03:17 GMT"
- },
- "legend" : {
- "enabled" : "false"
- },
- "chart" : {
- "type" : "column"
- },
- "tooltip" : {
- "pointFormat" : "<b>{point.y:.0f}</b>"
- },
- "title" : {
- "text" : "Perl Weekly Challenge Contributions - 2019"
- },
"series" : [
{
"data" : [
@@ -38,7 +8,7 @@
],
[
"Perl 5",
- 490
+ 491
],
[
"Perl 6",
@@ -47,17 +17,47 @@
],
"name" : "Contributions",
"dataLabels" : {
+ "format" : "{point.y:.0f}",
+ "enabled" : "true",
+ "y" : 10,
"color" : "#FFFFFF",
"style" : {
"fontSize" : "13px",
"fontFamily" : "Verdana, sans-serif"
},
- "y" : 10,
- "format" : "{point.y:.0f}",
"align" : "right",
- "rotation" : -90,
- "enabled" : "true"
+ "rotation" : -90
+ }
+ }
+ ],
+ "title" : {
+ "text" : "Perl Weekly Challenge Contributions - 2019"
+ },
+ "subtitle" : {
+ "text" : "Last updated at 2019-06-17 16:15:45 GMT"
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "xAxis" : {
+ "type" : "category",
+ "labels" : {
+ "style" : {
+ "fontFamily" : "Verdana, sans-serif",
+ "fontSize" : "13px"
}
}
- ]
+ },
+ "yAxis" : {
+ "title" : {
+ "text" : null
+ },
+ "min" : 0
+ },
+ "legend" : {
+ "enabled" : "false"
+ },
+ "tooltip" : {
+ "pointFormat" : "<b>{point.y:.0f}</b>"
+ }
}
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 187d796baa..74bc382dac 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -2,107 +2,10 @@
"legend" : {
"enabled" : "false"
},
- "chart" : {
- "type" : "column"
- },
- "plotOptions" : {
- "series" : {
- "borderWidth" : 0,
- "dataLabels" : {
- "format" : "{point.y}",
- "enabled" : 1
- }
- }
- },
- "subtitle" : {
- "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-06-17 14:03:17 GMT"
- },
- "yAxis" : {
- "title" : {
- "text" : "Total Solutions"
- }
- },
- "xAxis" : {
- "type" : "category"
- },
- "series" : [
- {
- "name" : "Perl Weekly Challenge Languages",
- "data" : [
- {
- "drilldown" : "001",
- "name" : "#001",
- "y" : 123
- },
- {
- "drilldown" : "002",
- "name" : "#002",
- "y" : 104
- },
- {
- "drilldown" : "003",
- "name" : "#003",
- "y" : 66
- },
- {
- "drilldown" : "004",
- "name" : "#004",
- "y" : 84
- },
- {
- "y" : 66,
- "name" : "#005",
- "drilldown" : "005"
- },
- {
- "drilldown" : "006",
- "name" : "#006",
- "y" : 47
- },
- {
- "name" : "#007",
- "drilldown" : "007",
- "y" : 54
- },
- {
- "name" : "#008",
- "drilldown" : "008",
- "y" : 67
- },
- {
- "drilldown" : "009",
- "name" : "#009",
- "y" : 62
- },
- {
- "name" : "#010",
- "drilldown" : "010",
- "y" : 58
- },
- {
- "y" : 75,
- "drilldown" : "011",
- "name" : "#011"
- },
- {
- "y" : 80,
- "drilldown" : "012",
- "name" : "#012"
- },
- {
- "y" : 4,
- "name" : "#013",
- "drilldown" : "013"
- }
- ],
- "colorByPoint" : "true"
- }
- ],
"drilldown" : {
"series" : [
{
"id" : "001",
- "name" : "001",
"data" : [
[
"Perl 5",
@@ -116,11 +19,11 @@
"Blog",
10
]
- ]
+ ],
+ "name" : "001"
},
{
"id" : "002",
- "name" : "002",
"data" : [
[
"Perl 5",
@@ -134,10 +37,10 @@
"Blog",
9
]
- ]
+ ],
+ "name" : "002"
},
{
- "id" : "003",
"data" : [
[
"Perl 5",
@@ -152,11 +55,10 @@
8
]
],
- "name" : "003"
+ "name" : "003",
+ "id" : "003"
},
{
- "id" : "004",
- "name" : "004",
"data" : [
[
"Perl 5",
@@ -170,9 +72,12 @@
"Blog",
9
]
- ]
+ ],
+ "name" : "004",
+ "id" : "004"
},
{
+ "id" : "005",
"data" : [
[
"Perl 5",
@@ -187,10 +92,11 @@
11
]
],
- "name" : "005",
- "id" : "005"
+ "name" : "005"
},
{
+ "id" : "006",
+ "name" : "006",
"data" : [
[
"Perl 5",
@@ -204,12 +110,10 @@
"Blog",
6
]
- ],
- "name" : "006",
- "id" : "006"
+ ]
},
{
- "id" : "007",
+ "name" : "007",
"data" : [
[
"Perl 5",
@@ -224,7 +128,7 @@
8
]
],
- "name" : "007"
+ "id" : "007"
},
{
"id" : "008",
@@ -245,6 +149,7 @@
]
},
{
+ "id" : "009",
"name" : "009",
"data" : [
[
@@ -259,11 +164,9 @@
"Blog",
11
]
- ],
- "id" : "009"
+ ]
},
{
- "id" : "010",
"name" : "010",
"data" : [
[
@@ -278,9 +181,11 @@
"Blog",
9
]
- ]
+ ],
+ "id" : "010"
},
{
+ "id" : "011",
"data" : [
[
"Perl 5",
@@ -295,10 +200,11 @@
8
]
],
- "name" : "011",
- "id" : "011"
+ "name" : "011"
},
{
+ "id" : "012",
+ "name" : "012",
"data" : [
[
"Perl 5",
@@ -312,15 +218,13 @@
"Blog",
9
]
- ],
- "name" : "012",
- "id" : "012"
+ ]
},
{
"data" : [
[
"Perl 5",
- 0
+ 1
],
[
"Perl 6",
@@ -336,12 +240,108 @@
}
]
},
- "title" : {
- "text" : "Perl Weekly Challenge Language"
+ "yAxis" : {
+ "title" : {
+ "text" : "Total Solutions"
+ }
+ },
+ "xAxis" : {
+ "type" : "category"
},
"tooltip" : {
- "followPointer" : "true",
"pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>",
+ "followPointer" : "true",
"headerFormat" : "<span style=\"font-size:11px\"></span>"
+ },
+ "subtitle" : {
+ "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-06-17 16:15:45 GMT"
+ },
+ "title" : {
+ "text" : "Perl Weekly Challenge Language"
+ },
+ "series" : [
+ {
+ "colorByPoint" : "true",
+ "data" : [
+ {
+ "name" : "#001",
+ "drilldown" : "001",
+ "y" : 123
+ },
+ {
+ "name" : "#002",
+ "drilldown" : "002",
+ "y" : 104
+ },
+ {
+ "y" : 66,
+ "name" : "#003",
+ "drilldown" : "003"
+ },
+ {
+ "y" : 84,
+ "name" : "#004",
+ "drilldown" : "004"
+ },
+ {
+ "drilldown" : "005",
+ "name" : "#005",
+ "y" : 66
+ },
+ {
+ "y" : 47,
+ "drilldown" : "006",
+ "name" : "#006"
+ },
+ {
+ "drilldown" : "007",
+ "name" : "#007",
+ "y" : 54
+ },
+ {
+ "y" : 67,
+ "drilldown" : "008",
+ "name" : "#008"
+ },
+ {
+ "y" : 62,
+ "name" : "#009",
+ "drilldown" : "009"
+ },
+ {
+ "y" : 58,
+ "drilldown" : "010",
+ "name" : "#010"
+ },
+ {
+ "name" : "#011",
+ "drilldown" : "011",
+ "y" : 75
+ },
+ {
+ "y" : 80,
+ "name" : "#012",
+ "drilldown" : "012"
+ },
+ {
+ "y" : 5,
+ "drilldown" : "013",
+ "name" : "#013"
+ }
+ ],
+ "name" : "Perl Weekly Challenge Languages"
+ }
+ ],
+ "plotOptions" : {
+ "series" : {
+ "dataLabels" : {
+ "format" : "{point.y}",
+ "enabled" : 1
+ },
+ "borderWidth" : 0
+ }
+ },
+ "chart" : {
+ "type" : "column"
}
}
diff --git a/stats/pwc-leaders.json b/stats/pwc-leaders.json
index d4ef119f07..3c8e5e3d61 100644
--- a/stats/pwc-leaders.json
+++ b/stats/pwc-leaders.json
@@ -1,43 +1,64 @@
{
+ "tooltip" : {
+ "headerFormat" : "<span style=\"font-size:11px\"></span>",
+ "followPointer" : "true",
+ "pointFormat" : "<span style=\"color:{point.color}\">{point.name}</span>: <b>{point.y:f}</b><br/>"
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "xAxis" : {
+ "type" : "category"
+ },
+ "legend" : {
+ "enabled" : "false"
+ },
+ "subtitle" : {
+ "text" : "Click the columns to drilldown the score breakdown. Last updated at 2019-06-17 16:15:42 GMT"
+ },
+ "title" : {
+ "text" : "Perl Weekly Challenge Leaders (TOP 50)"
+ },
"drilldown" : {
"series" : [
{
- "name" : "Joelle Maslak",
"data" : [
[
- "Blog",
- 4
+ "Perl 5",
+ 29
],
[
"Perl 6",
30
],
[
- "Perl 5",
- 29
+ "Blog",
+ 4
]
],
- "id" : "Joelle Maslak"
+ "id" : "Joelle Maslak",
+ "name" : "Joelle Maslak"
},
{
"data" : [
[
- "Perl 6",
- 23
- ],
- [
"Blog",
14
],
[
+ "Perl 6",
+ 23
+ ],
+ [
"Perl 5",
24
]
],
- "id" : "Laurent Rosenfeld",
- "name" : "Laurent Rosenfeld"
+ "name" : "Laurent Rosenfeld",
+ "id" : "Laurent Rosenfeld"
},
{
+ "name" : "Jaldhar H. Vyas",
"id" : "Jaldhar H. Vyas",
"data" : [
[
@@ -48,11 +69,11 @@
"Perl 6",
24
]
- ],
- "name" : "Jaldhar H. Vyas"
+ ]
},
{
"name" : "Ruben Westerberg",
+ "id" : "Ruben Westerberg",
"data" : [
[
"Perl 6",
@@ -62,10 +83,11 @@
"Perl 5",
21
]
- ],
- "id" : "Ruben Westerberg"
+ ]
},
{
+ "name" : "Adam Russell",
+ "id" : "Adam Russell",
"data" : [
[
"Perl 5",
@@ -75,72 +97,71 @@
"Blog",
12
]
- ],
- "id" : "Adam Russell",
- "name" : "Adam Russell"
+ ]
},
{
"data" : [
[
- "Perl 6",
- 21
- ],
- [
"Blog",
11
+ ],
+ [
+ "Perl 6",
+ 21
]
],
- "id" : "Arne Sommer",
- "name" : "Arne Sommer"
+ "name" : "Arne Sommer",
+ "id" : "Arne Sommer"
},
{
+ "id" : "Kian-Meng Ang",
"name" : "Kian-Meng Ang",
"data" : [
[
- "Perl 5",
- 21
- ],
- [
"Blog",
11
+ ],
+ [
+ "Perl 5",
+ 21
]
- ],
- "id" : "Kian-Meng Ang"
+ ]
},
{
+ "id" : "Simon Proctor",
"name" : "Simon Proctor",
"data" : [
[
- "Perl 5",
- 4
- ],
- [
"Blog",
6
],
[
"Perl 6",
21
+ ],
+ [
+ "Perl 5",
+ 4
]
- ],
- "id" : "Simon Proctor"
+ ]
},
{
- "id" : "Athanasius",
"data" : [
[
- "Perl 6",
- 2
- ],
- [
"Perl 5",
26
+ ],
+ [
+ "Perl 6",
+ 2
]
],
+ "id" : "Athanasius",
"name" : "Athanasius"
},
{
"id" : "Francis Whittle",
+ "name" : "Francis Whittle",
"data" : [
[
"Perl 6",
@@ -150,8 +171,7 @@
"Blog",
6
]
- ],
- "name" : "Francis Whittle"
+ ]
},
{
"name" : "Gustavo Chaves",
@@ -169,6 +189,7 @@
},
{
"id" : "E. Choroba",
+ "name" : "E. Choroba",
"data" : [
[
"Blog",
@@ -178,39 +199,37 @@
"Perl 5",
16
]
- ],
- "name" : "E. Choroba"
+ ]
},
{
- "id" : "Jo Christian Oterhals",
"data" : [
[
"Perl 6",
12
],
[
- "Blog",
+ "Perl 5",
6
],
[
- "Perl 5",
+ "Blog",
6
]
],
- "name" : "Jo Christian Oterhals"
+ "name" : "Jo Christian Oterhals",
+ "id" : "Jo Christian Oterhals"
},
{
- "id" : "Andrezgz",
"data" : [
[
"Perl 5",
23
]
],
- "name" : "Andrezgz"
+ "name" : "Andrezgz",
+ "id" : "Andrezgz"
},
{
- "id" : "Dave Jacoby",
"data" : [
[
"Blog",
@@ -221,21 +240,22 @@
11
]
],
+ "id" : "Dave Jacoby",
"name" : "Dave Jacoby"
},
{
+ "name" : "Dr James A. Smith",
+ "id" : "Dr James A. Smith",
"data" : [
[
- "Perl 5",
- 12
- ],
- [
"Perl 6",
10
+ ],
+ [
+ "Perl 5",
+ 12
]
- ],
- "id" : "Dr James A. Smith",
- "name" : "Dr James A. Smith"
+ ]
},
{
"data" : [
@@ -248,17 +268,16 @@
"name" : "Daniel Mantovani"
},
{
- "name" : "Duncan C. White",
"data" : [
[
"Perl 5",
18
]
],
- "id" : "Duncan C. White"
+ "id" : "Duncan C. White",
+ "name" : "Duncan C. White"
},
{
- "name" : "Mark Senn",
"data" : [
[
"Perl 6",
@@ -269,6 +288,7 @@
4
]
],
+ "name" : "Mark Senn",
"id" : "Mark Senn"
},
{
@@ -282,46 +302,46 @@
8
]
],
- "id" : "Nick Logan",
- "name" : "Nick Logan"
+ "name" : "Nick Logan",
+ "id" : "Nick Logan"
},
{
- "id" : "Lars Balker",
"data" : [
[
- "Perl 6",
- 4
- ],
- [
"Perl 5",
10
+ ],
+ [
+ "Perl 6",
+ 4
]
],
+ "id" : "Lars Balker",
"name" : "Lars Balker"
},
{
- "id" : "Yozen Hernandez",
"data" : [
[
- "Perl 5",
- 10
- ],
- [
"Blog",
4
+ ],
+ [
+ "Perl 5",
+ 10
]
],
+ "id" : "Yozen Hernandez",
"name" : "Yozen Hernandez"
},
{
- "name" : "Steven Wilson",
"data" : [
[
"Perl 5",
13
]
],
- "id" : "Steven Wilson"
+ "id" : "Steven Wilson",
+ "name" : "Steven Wilson"
},
{
"name" : "Alicia Bielsa",
@@ -336,162 +356,172 @@
{
"data" : [
[
- "Perl 5",
- 4
- ],
- [
"Perl 6",
7
+ ],
+ [
+ "Perl 5",
+ 4
]
],
"id" : "Feng Chang",
"name" : "Feng Chang"
},
{
- "name" : "Ozzy",
"data" : [
[
"Perl 6",
11
]
],
+ "name" : "Ozzy",
"id" : "Ozzy"
},
{
+ "name" : "Doug Schrag",
"id" : "Doug Schrag",
"data" : [
[
"Perl 6",
10
]
- ],
- "name" : "Doug Schrag"
+ ]
},
{
"name" : "Maxim Nechaev",
+ "id" : "Maxim Nechaev",
"data" : [
[
"Perl 5",
10
]
- ],
- "id" : "Maxim Nechaev"
+ ]
},
{
- "name" : "Guillermo Ramos",
"data" : [
[
"Perl 5",
9
]
],
- "id" : "Guillermo Ramos"
+ "id" : "Guillermo Ramos",
+ "name" : "Guillermo Ramos"
},
{
"id" : "Robert Gratza",
+ "name" : "Robert Gratza",
"data" : [
[
- "Perl 5",
- 2
- ],
- [
"Perl 6",
6
+ ],
+ [
+ "Perl 5",
+ 2
]
- ],
- "name" : "Robert Gratza"
+ ]
},
{
- "name" : "John Barrett",
"data" : [
[
"Perl 5",
7
]
],
+ "name" : "John Barrett",
"id" : "John Barrett"
},
{
- "name" : "Khalid",
- "id" : "Khalid",
"data" : [
[
"Perl 5",
4
],
[
- "Blog",
- 1
- ],
- [
"Perl 6",
2
+ ],
+ [
+ "Blog",
+ 1
]
- ]
+ ],
+ "id" : "Khalid",
+ "name" : "Khalid"
},
{
- "id" : "Jaime Corchado",
"data" : [
[
"Perl 5",
6
]
],
- "name" : "Jaime Corchado"
+ "name" : "Jaime Corchado",
+ "id" : "Jaime Corchado"
},
{
+ "name" : "Kevin Colyer",
"id" : "Kevin Colyer",
"data" : [
[
"Perl 6",
6
]
- ],
- "name" : "Kevin Col