diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-09-19 00:41:19 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-09-19 00:41:19 +0100 |
| commit | 3b5da31652f26d7752e9a0a5a8c098090b38450a (patch) | |
| tree | 373a9b4ca93f9fd15a4a9242233730218fb72cf5 | |
| parent | 28707ab42c17d77e6ca45901471d966a21cdaedd (diff) | |
| download | perlweeklychallenge-club-3b5da31652f26d7752e9a0a5a8c098090b38450a.tar.gz perlweeklychallenge-club-3b5da31652f26d7752e9a0a5a8c098090b38450a.tar.bz2 perlweeklychallenge-club-3b5da31652f26d7752e9a0a5a8c098090b38450a.zip | |
- Added solutions by Pete Houston.
| -rw-r--r-- | challenge-078/pete-houston/perl/ch-1.pl | 22 | ||||
| -rw-r--r-- | challenge-078/pete-houston/perl/ch-2.pl | 36 | ||||
| -rw-r--r-- | stats/pwc-current.json | 285 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown-summary.json | 62 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown.json | 572 | ||||
| -rw-r--r-- | stats/pwc-leaders.json | 406 | ||||
| -rw-r--r-- | stats/pwc-summary-1-30.json | 118 | ||||
| -rw-r--r-- | stats/pwc-summary-121-150.json | 88 | ||||
| -rw-r--r-- | stats/pwc-summary-151-180.json | 96 | ||||
| -rw-r--r-- | stats/pwc-summary-181-210.json | 72 | ||||
| -rw-r--r-- | stats/pwc-summary-31-60.json | 20 | ||||
| -rw-r--r-- | stats/pwc-summary-61-90.json | 122 | ||||
| -rw-r--r-- | stats/pwc-summary-91-120.json | 102 | ||||
| -rw-r--r-- | stats/pwc-summary.json | 40 |
14 files changed, 1057 insertions, 984 deletions
diff --git a/challenge-078/pete-houston/perl/ch-1.pl b/challenge-078/pete-houston/perl/ch-1.pl new file mode 100644 index 0000000000..8a357af852 --- /dev/null +++ b/challenge-078/pete-houston/perl/ch-1.pl @@ -0,0 +1,22 @@ +#!/usr/bin/env perl +#=============================================================================== +# +# FILE: 7801.pl +# +# USAGE: ./7801.pl N ... +# +# DESCRIPTION: Output a list of all elements greater than those which +# follow +# +# AUTHOR: Pete Houston (pete), cpan@openstrike.co.uk +# ORGANIZATION: Openstrike +# VERSION: 1.0 +# CREATED: 15/09/20 +#=============================================================================== + +use strict; +use warnings; + +my $max = $ARGV[-1] - 1; +my @out = reverse grep { $_ > $max and $max = $_, 1 } reverse @ARGV; +print "@out\n"; diff --git a/challenge-078/pete-houston/perl/ch-2.pl b/challenge-078/pete-houston/perl/ch-2.pl new file mode 100644 index 0000000000..010803ea4d --- /dev/null +++ b/challenge-078/pete-houston/perl/ch-2.pl @@ -0,0 +1,36 @@ +#!/usr/bin/env perl +#=============================================================================== +# +# FILE: 7802.pl +# +# USAGE: ./7802.pl +# +# DESCRIPTION: Array rotations +# +# AUTHOR: Pete Houston (pete), cpan@openstrike.co.uk +# ORGANIZATION: Openstrike +# VERSION: 1.0 +# CREATED: 15/09/20 +#=============================================================================== + +use strict; +use warnings; + +my ($arr, $ind) = get_inputs (); +my $res = rotate_arrays ($arr, $ind); +print "[@$_]\n" for @$res; + +sub rotate_arrays { + my ($arr, $ind) = @_; + my @aoa; + push @aoa, [@$arr[$_..$#$arr,0..$_-1]] for @$ind; + return \@aoa; +} + +sub get_inputs { + print "Enter your array on one line: "; + chomp (my @arr = split / /, <STDIN>); + print "Enter your list of starting points on one line: "; + my @ind = split / /, <STDIN>; + return (\@arr, \@ind); +} diff --git a/stats/pwc-current.json b/stats/pwc-current.json index aea9a0b5f6..f7e7110be9 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -1,29 +1,4 @@ { - "subtitle" : { - "text" : "[Champions: 31] Last updated at 2020-09-18 23:30:55 GMT" - }, - "tooltip" : { - "followPointer" : 1, - "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>", - "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>" - }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, - "plotOptions" : { - "series" : { - "borderWidth" : 0, - "dataLabels" : { - "enabled" : 1, - "format" : "{point.y}" - } - } - }, - "legend" : { - "enabled" : 0 - }, "drilldown" : { "series" : [ { @@ -33,21 +8,20 @@ 2 ] ], - "id" : "Abigail", - "name" : "Abigail" + "name" : "Abigail", + "id" : "Abigail" }, { + "name" : "Alexander Pankoff", "data" : [ [ "Perl", 2 ] ], - "name" : "Alexander Pankoff", "id" : "Alexander Pankoff" }, { - "name" : "Andinus", "id" : "Andinus", "data" : [ [ @@ -58,9 +32,11 @@ "Blog", 2 ] - ] + ], + "name" : "Andinus" }, { + "id" : "Andrew Shitov", "data" : [ [ "Raku", @@ -71,18 +47,17 @@ 1 ] ], - "name" : "Andrew Shitov", - "id" : "Andrew Shitov" + "name" : "Andrew Shitov" }, { - "name" : "Anton Fedotov", - "id" : "Anton Fedotov", "data" : [ [ "Perl", 2 ] - ] + ], + "name" : "Anton Fedotov", + "id" : "Anton Fedotov" }, { "id" : "Arne Sommer", @@ -103,14 +78,14 @@ ] }, { + "id" : "Bob Lied", "data" : [ [ "Perl", 2 ] ], - "name" : "Bob Lied", - "id" : "Bob Lied" + "name" : "Bob Lied" }, { "data" : [ @@ -123,14 +98,14 @@ "id" : "Colin Crain" }, { - "id" : "Dave Cross", "name" : "Dave Cross", "data" : [ [ "Perl", 2 ] - ] + ], + "id" : "Dave Cross" }, { "id" : "Dave Jacoby", @@ -153,8 +128,8 @@ "id" : "E. Choroba" }, { - "name" : "Flavio Poletti", "id" : "Flavio Poletti", + "name" : "Flavio Poletti", "data" : [ [ "Perl", @@ -177,37 +152,36 @@ "id" : "James Smith" }, { - "name" : "Jason Messer", - "id" : "Jason Messer", "data" : [ [ "Raku", 2 ] - ] + ], + "name" : "Jason Messer", + "id" : "Jason Messer" }, { - "id" : "Jorg Sommrey", - "name" : "Jorg Sommrey", "data" : [ [ "Perl", 2 ] - ] + ], + "name" : "Jorg Sommrey", + "id" : "Jorg Sommrey" }, { + "name" : "Kang-min Liu", "data" : [ [ "Raku", 2 ] ], - "id" : "Kang-min Liu", - "name" : "Kang-min Liu" + "id" : "Kang-min Liu" }, { - "name" : "Laurent Rosenfeld", "id" : "Laurent Rosenfeld", "data" : [ [ @@ -222,16 +196,17 @@ "Blog", 1 ] - ] + ], + "name" : "Laurent Rosenfeld" }, { + "id" : "Mark Anderson", "data" : [ [ "Raku", 2 ] ], - "id" : "Mark Anderson", "name" : "Mark Anderson" }, { @@ -259,10 +234,12 @@ 2 ] ], - "id" : "Mohammad S Anwar", - "name" : "Mohammad S Anwar" + "name" : "Mohammad S Anwar", + "id" : "Mohammad S Anwar" }, { + "id" : "Myoungjin Jeon", + "name" : "Myoungjin Jeon", "data" : [ [ "Perl", @@ -272,33 +249,39 @@ "Raku", 2 ] - ], - "id" : "Myoungjin Jeon", - "name" : "Myoungjin Jeon" + ] }, { + "id" : "Niels van Dijke", "data" : [ [ "Perl", 2 ] ], - "name" : "Niels van Dijke", - "id" : "Niels van Dijke" + "name" : "Niels van Dijke" }, { + "id" : "Nuno Vieira", + "name" : "Nuno Vieira", + "data" : [ + [ + "Perl", + 2 + ] + ] + }, + { + "name" : "Pete Houston", "data" : [ [ "Perl", 2 ] ], - "name" : "Nuno Vieira", - "id" : "Nuno Vieira" + "id" : "Pete Houston" }, { - "name" : "Roger Bell_West", - "id" : "Roger Bell_West", "data" : [ [ "Perl", @@ -312,11 +295,11 @@ "Blog", 1 ] - ] + ], + "name" : "Roger Bell_West", + "id" : "Roger Bell_West" }, { - "id" : "Shahed Nooshmand", - "name" : "Shahed Nooshmand", "data" : [ [ "Raku", @@ -326,10 +309,11 @@ "Blog", 1 ] - ] + ], + "name" : "Shahed Nooshmand", + "id" : "Shahed Nooshmand" }, { - "id" : "Simon Green", "name" : "Simon Green", "data" : [ [ @@ -340,7 +324,8 @@ "Blog", 1 ] - ] + ], + "id" : "Simon Green" }, { "data" : [ @@ -349,20 +334,21 @@ 2 ] ], - "id" : "Simon Proctor", - "name" : "Simon Proctor" + "name" : "Simon Proctor", + "id" : "Simon Proctor" }, { + "name" : "Steven Wilson", "data" : [ [ "Perl", 1 ] ], - "id" : "Steven Wilson", - "name" : "Steven Wilson" + "id" : "Steven Wilson" }, { + "name" : "Ulrich Rieke", "data" : [ [ "Perl", @@ -373,20 +359,21 @@ 2 ] ], - "name" : "Ulrich Rieke", "id" : "Ulrich Rieke" }, { "name" : "Vinod Kumar K", - "id" : "Vinod Kumar K", "data" : [ [ "Perl", 1 ] - ] + ], + "id" : "Vinod Kumar K" }, { + "id" : "Walt Mankowski", + "name" : "Walt Mankowski", "data" : [ [ "Perl", @@ -396,75 +383,91 @@ "Blog", 1 ] - ], - "id" : "Walt Mankowski", - "name" : "Walt Mankowski" + ] } ] }, - "chart" : { - "type" : "column" - }, - "title" : { - "text" : "Perl Weekly Challenge - 078" + "plotOptions" : { + "series" : { + "borderWidth" : 0, + "dataLabels" : { + "enabled" : 1, + "format" : "{point.y}" + } + } }, "xAxis" : { "type" : "category" }, + "subtitle" : { + "text" : "[Champions: 32] Last updated at 2020-09-18 23:40:56 GMT" + }, + "legend" : { + "enabled" : 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 + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, "series" : [ { "colorByPoint" : 1, - "name" : "Perl Weekly Challenge - 078", "data" : [ { - "name" : "Abigail", "drilldown" : "Abigail", + "name" : "Abigail", "y" : 2 }, { + "y" : 2, "name" : "Alexander Pankoff", - "drilldown" : "Alexander Pankoff", - "y" : 2 + "drilldown" : "Alexander Pankoff" }, { + "drilldown" : "Andinus", "name" : "Andinus", - "y" : 4, - "drilldown" : "Andinus" + "y" : 4 }, { - "drilldown" : "Andrew Shitov", + "name" : "Andrew Shitov", "y" : 3, - "name" : "Andrew Shitov" + "drilldown" : "Andrew Shitov" }, { "name" : "Anton Fedotov", - "drilldown" : "Anton Fedotov", - "y" : 2 + "y" : 2, + "drilldown" : "Anton Fedotov" }, { - "name" : "Arne Sommer", "drilldown" : "Arne Sommer", - "y" : 5 + "y" : 5, + "name" : "Arne Sommer" }, { "y" : 2, - "drilldown" : "Bob Lied", - "name" : "Bob Lied" + "name" : "Bob Lied", + "drilldown" : "Bob Lied" }, { + "name" : "Colin Crain", "y" : 1, - "drilldown" : "Colin Crain", - "name" : "Colin Crain" + "drilldown" : "Colin Crain" }, { - "drilldown" : "Dave Cross", + "name" : "Dave Cross", "y" : 2, - "name" : "Dave Cross" + "drilldown" : "Dave Cross" }, { "name" : "Dave Jacoby", - "drilldown" : "Dave Jacoby", - "y" : 2 + "y" : 2, + "drilldown" : "Dave Jacoby" }, { "drilldown" : "E. Choroba", @@ -472,19 +475,19 @@ "name" : "E. Choroba" }, { + "drilldown" : "Flavio Poletti", "name" : "Flavio Poletti", - "y" : 4, - "drilldown" : "Flavio Poletti" + "y" : 4 }, { - "y" : 2, "drilldown" : "James Smith", - "name" : "James Smith" + "name" : "James Smith", + "y" : 2 }, { - "name" : "Jason Messer", "drilldown" : "Jason Messer", - "y" : 2 + "y" : 2, + "name" : "Jason Messer" }, { "name" : "Jorg Sommrey", @@ -492,9 +495,9 @@ "drilldown" : "Jorg Sommrey" }, { - "y" : 2, "drilldown" : "Kang-min Liu", - "name" : "Kang-min Liu" + "name" : "Kang-min Liu", + "y" : 2 }, { "name" : "Laurent Rosenfeld", @@ -502,14 +505,14 @@ "drilldown" : "Laurent Rosenfeld" }, { + "name" : "Mark Anderson", "y" : 2, - "drilldown" : "Mark Anderson", - "name" : "Mark Anderson" + "drilldown" : "Mark Anderson" }, { - "drilldown" : "Markus Holzer", "y" : 3, - "name" : "Markus Holzer" + "name" : "Markus Holzer", + "drilldown" : "Markus Holzer" }, { "drilldown" : "Mohammad S Anwar", @@ -517,29 +520,34 @@ "name" : "Mohammad S Anwar" }, { - "drilldown" : "Myoungjin Jeon", "y" : 4, - "name" : "Myoungjin Jeon" + "name" : "Myoungjin Jeon", + "drilldown" : "Myoungjin Jeon" }, { - "y" : 2, "drilldown" : "Niels van Dijke", - "name" : "Niels van Dijke" + "name" : "Niels van Dijke", + "y" : 2 }, { - "drilldown" : "Nuno Vieira", "y" : 2, - "name" : "Nuno Vieira" + "name" : "Nuno Vieira", + "drilldown" : "Nuno Vieira" + }, + { + "drilldown" : "Pete Houston", + "name" : "Pete Houston", + "y" : 2 }, { - "name" : "Roger Bell_West", "drilldown" : "Roger Bell_West", + "name" : "Roger Bell_West", "y" : 5 }, { "y" : 3, - "drilldown" : "Shahed Nooshmand", - "name" : "Shahed Nooshmand" + "name" : "Shahed Nooshmand", + "drilldown" : "Shahed Nooshmand" }, { "name" : "Simon Green", @@ -547,31 +555,38 @@ "drilldown" : "Simon Green" }, { + "drilldown" : "Simon Proctor", "name" : "Simon Proctor", - "y" : 2, - "drilldown" : "Simon Proctor" + "y" : 2 }, { - "name" : "Steven Wilson", "y" : 1, + "name" : "Steven Wilson", "drilldown" : "Steven Wilson" }, { "drilldown" : "Ulrich Rieke", - "y" : 4, - "name" : "Ulrich Rieke" + "name" : "Ulrich Rieke", + "y" : 4 }, { "drilldown" : "Vinod Kumar K", - "y" : 1, - "name" : "Vinod Kumar K" + "name" : "Vinod Kumar K", + "y" : 1 }, { "y" : 3, - "drilldown" : "Walt Mankowski", - "name" : "Walt Mankowski" + "name" : "Walt Mankowski", + "drilldown" : "Walt Mankowski" } - ] + ], + "name" : "Perl Weekly Challenge - 078" } - ] + ], + "title" : { + "text" : "Perl Weekly Challenge - 078" + }, + "chart" : { + "type" : "column" + } } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index c2e58b245d..3641f27287 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,27 +1,42 @@ { - "tooltip" : { - "pointFormat" : "<b>{point.y:.0f}</b>" - }, "subtitle" : { - "text" : "Last updated at 2020-09-18 23:30:55 GMT" + "text" : "Last updated at 2020-09-18 23:40:56 GMT" }, "xAxis" : { - "type" : "category", "labels" : { "style" : { - "fontFamily" : "Verdana, sans-serif", - "fontSize" : "13px" + "fontSize" : "13px", + "fontFamily" : "Verdana, sans-serif" } + }, + "type" : "category" + }, + "yAxis" : { + "min" : 0, + "title" : { + "text" : null } }, - "title" : { - "text" : "Perl Weekly Challenge Contributions [2019 - 2020]" + "legend" : { + "enabled" : "false" }, - "chart" : { - "type" : "column" + "tooltip" : { + "pointFormat" : "<b>{point.y:.0f}</b>" }, "series" : [ { + "dataLabels" : { + "format" : "{point.y:.0f}", + "enabled" : "true", + "y" : 10, + "color" : "#FFFFFF", + "align" : "right", + "style" : { + "fontFamily" : "Verdana, sans-serif", + "fontSize" : "13px" + }, + "rotation" : -90 + }, "data" : [ [ "Blog", @@ -29,35 +44,20 @@ ], [ "Perl", - 3298 + 3300 ], [ "Raku", 2146 ] ], - "dataLabels" : { - "color" : "#FFFFFF", - "style" : { - "fontFamily" : "Verdana, sans-serif", - "fontSize" : "13px" - }, - "rotation" : -90, - "enabled" : "true", - "align" : "right", - "y" : 10, - "format" : "{point.y:.0f}" - }, "name" : "Contributions" } ], - "yAxis" : { - "min" : 0, - "title" : { - "text" : null - } + "title" : { + "text" : "Perl Weekly Challenge Contributions [2019 - 2020]" }, - "legend" : { - "enabled" : "false" + "chart" : { + "type" : "column" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index 2fd9778d86..ffac99d663 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,41 +1,17 @@ { - "subtitle" : { - "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-09-18 23:30:55 GMT" - }, - "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" : { - "enabled" : 1, - "format" : "{point.y}" - } - } - }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, "series" : [ { + "colorByPoint" : "true", "data" : [ { - "name" : "#001", + "drilldown" : "001", "y" : 142, - "drilldown" : "001" + "name" : "#001" }, { + "name" : "#002", "y" : 111, - "drilldown" : "002", - "name" : "#002" + "drilldown" : "002" }, { "drilldown" : "003", @@ -43,9 +19,9 @@ "name" : "#003" }, { + "y" : 91, "name" : "#004", - "drilldown" : "004", - "y" : 91 + "drilldown" : "004" }, { "name" : "#005", @@ -54,118 +30,118 @@ }, { "drilldown" : "006", - "y" : 52, - "name" : "#006" + "name" : "#006", + "y" : 52 }, { - "y" : 59, "drilldown" : "007", - "name" : "#007" + "name" : "#007", + "y" : 59 }, { - "name" : "#008", "y" : 72, + "name" : "#008", "drilldown" : "008" }, { - "y" : 70, "drilldown" : "009", + "y" : 70, "name" : "#009" }, { + "drilldown" : "010", "name" : "#010", - "y" : 60, - "drilldown" : "010" + "y" : 60 }, { "y" : 79, - "drilldown" : "011", - "name" : "#011" + "name" : "#011", + "drilldown" : "011" }, { "y" : 83, - "drilldown" : "012", - "name" : "#012" + "name" : "#012", + "drilldown" : "012" }, { - "y" : 78, "drilldown" : "013", + "y" : 78, "name" : "#013" }, { - "drilldown" : "014", + "name" : "#014", "y" : 96, - "name" : "#014" + "drilldown" : "014" }, { - "y" : 93, "drilldown" : "015", + "y" : 93, "name" : "#015" }, { - "drilldown" : "016", "y" : 66, - "name" : "#016" + "name" : "#016", + "drilldown" : "016" }, { - "name" : "#017", "drilldown" : "017", + "name" : "#017", "y" : 79 }, { + "name" : "#018", "y" : 76, - "drilldown" : "018", - "name" : "#018" + "drilldown" : "018" }, { "name" : "#019", - "drilldown" : "019", - "y" : 97 + "y" : 97, + "drilldown" : "019" }, { - "name" : "#020", + "drilldown" : "020", "y" : 95, - "drilldown" : "020" + "name" : "#020" }, { - "y" : 67, "drilldown" : "021", - "name" : "#021" + "name" : "#021", + "y" : 67 }, { - "drilldown" : "022", "y" : 63, - "name" : "#022" + "name" : "#022", + "drilldown" : "022" }, { - "y" : 91, "drilldown" : "023", - "name" : "#023" + "name" : "#023", + "y" : 91 }, { "name" : "#024", - "drilldown" : "024", - "y" : 70 + "y" : 70, + "drilldown" : "024" }, { - "name" : "#025", "drilldown" : "025", - "y" : 55 + "y" : 55, + "name" : "#025" }, { - "y" : 70, "drilldown" : "026", - "name" : "#026" + "name" : "#026", + "y" : 70 }, { - "y" : 58, "drilldown" : "027", + "y" : 58, "name" : "#027" }, { + "name" : "#028", "y" : 78, - "drilldown" : "028", - "name" : "#028" + "drilldown" : "028" }, { "drilldown" : "029", @@ -173,14 +149,14 @@ "name" : "#029" }, { - "drilldown" : "030", "y" : 115, - "name" : "#030" + "name" : "#030", + "drilldown" : "030" }, { - "drilldown" : "031", + "name" : "#031", "y" : 87, - "name" : "#031" + "drilldown" : "031" }, { "drilldown" : "032", @@ -194,13 +170,13 @@ }, { "drilldown" : "034", - "y" : 62, - "name" : "#034" + "name" : "#034", + "y" : 62 }, { - "drilldown" : "035", "y" : 62, - "name" : "#035" + "name" : "#035", + "drilldown" : "035" }, { "drilldown" : "036", @@ -213,19 +189,19 @@ "drilldown" : "037" }, { - "name" : "#038", "y" : 65, + "name" : "#038", "drilldown" : "038" }, { "drilldown" : "039", - "y" : 60, - "name" : "#039" + "name" : "#039", + "y" : 60 |
