diff options
| -rw-r--r-- | challenge-032/markus-holzer/perl6/ch-1.p6 | 26 | ||||
| -rw-r--r-- | challenge-032/markus-holzer/perl6/ch-2.p6 | 26 | ||||
| -rw-r--r-- | stats/pwc-current.json | 99 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown-summary.json | 74 | ||||
| -rw-r--r-- | stats/pwc-language-breakdown.json | 502 | ||||
| -rw-r--r-- | stats/pwc-leaders.json | 524 | ||||
| -rw-r--r-- | stats/pwc-summary-1-30.json | 42 | ||||
| -rw-r--r-- | stats/pwc-summary-121-150.json | 50 | ||||
| -rw-r--r-- | stats/pwc-summary-31-60.json | 44 | ||||
| -rw-r--r-- | stats/pwc-summary-61-90.json | 52 | ||||
| -rw-r--r-- | stats/pwc-summary-91-120.json | 42 | ||||
| -rw-r--r-- | stats/pwc-summary.json | 300 |
12 files changed, 924 insertions, 857 deletions
diff --git a/challenge-032/markus-holzer/perl6/ch-1.p6 b/challenge-032/markus-holzer/perl6/ch-1.p6 new file mode 100644 index 0000000000..f1eb4d25dc --- /dev/null +++ b/challenge-032/markus-holzer/perl6/ch-1.p6 @@ -0,0 +1,26 @@ +my %*SUB-MAIN-OPTS = :named-anywhere; + +multi sub MAIN( *@files, Bool :$csv, Bool :$graph, Bool :$sort-by-label ) +{ + CATCH { return .message.say } + + my @words = @files + ?? @files.map( |*.IO.lines ) + !! |$*ARGFILES.lines; + + my $weights = Bag.new( @words ); + my $lngst = max $weights.keys.map( *.chars ); + + my $format = $csv ?? "%s, %s" !! + $graph ?? "%{$lngst}s | %s " !! + "%-{$lngst}s %s " ; + + my &sorter = $sort-by-label + ?? { $^a.key cmp $^b.key } + !! { $^b.value <=> $^a.value }; + + .say for $weights + .sort( &sorter ) + .map({ .key => $graph ?? "#" x .value !! .value }) + .map({ sprintf $format, .key, .value }); +}
\ No newline at end of file diff --git a/challenge-032/markus-holzer/perl6/ch-2.p6 b/challenge-032/markus-holzer/perl6/ch-2.p6 new file mode 100644 index 0000000000..f1eb4d25dc --- /dev/null +++ b/challenge-032/markus-holzer/perl6/ch-2.p6 @@ -0,0 +1,26 @@ +my %*SUB-MAIN-OPTS = :named-anywhere; + +multi sub MAIN( *@files, Bool :$csv, Bool :$graph, Bool :$sort-by-label ) +{ + CATCH { return .message.say } + + my @words = @files + ?? @files.map( |*.IO.lines ) + !! |$*ARGFILES.lines; + + my $weights = Bag.new( @words ); + my $lngst = max $weights.keys.map( *.chars ); + + my $format = $csv ?? "%s, %s" !! + $graph ?? "%{$lngst}s | %s " !! + "%-{$lngst}s %s " ; + + my &sorter = $sort-by-label + ?? { $^a.key cmp $^b.key } + !! { $^b.value <=> $^a.value }; + + .say for $weights + .sort( &sorter ) + .map({ .key => $graph ?? "#" x .value !! .value }) + .map({ sprintf $format, .key, .value }); +}
\ No newline at end of file diff --git a/stats/pwc-current.json b/stats/pwc-current.json index 12633d5d6e..d56a5ca4e7 100644 --- a/stats/pwc-current.json +++ b/stats/pwc-current.json @@ -1,60 +1,51 @@ { + "subtitle" : { + "text" : "[Champions: 5] Last updated at 2019-10-28 21:42:10 GMT" + }, + "xAxis" : { + "type" : "category" + }, "series" : [ { - "name" : "Perl Weekly Challenge - 032", "data" : [ { + "name" : "Dave Cross", "y" : 2, - "drilldown" : "Dave Cross", - "name" : "Dave Cross" + "drilldown" : "Dave Cross" }, { - "drilldown" : "Lars Balker", "name" : "Lars Balker", - "y" : 2 + "y" : 2, + "drilldown" : "Lars Balker" + }, + { + "name" : "Markus Holzer", + "y" : 2, + "drilldown" : "Markus Holzer" }, { + "name" : "Simon Proctor", "y" : 2, - "drilldown" : "Simon Proctor", - "name" : "Simon Proctor" + "drilldown" : "Simon Proctor" }, { "drilldown" : "Yet Ebreo", - "name" : "Yet Ebreo", - "y" : 2 + "y" : 2, + "name" : "Yet Ebreo" } ], - "colorByPoint" : 1 + "colorByPoint" : 1, + "name" : "Perl Weekly Challenge - 032" } ], - "subtitle" : { - "text" : "[Champions: 4] Last updated at 2019-10-28 16:55:26 GMT" - }, - "plotOptions" : { - "series" : { - "borderWidth" : 0, - "dataLabels" : { - "enabled" : 1, - "format" : "{point.y}" - } - } - }, - "title" : { - "text" : "Perl Weekly Challenge - 032" - }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, "legend" : { "enabled" : 0 }, "drilldown" : { "series" : [ { - "name" : "Dave Cross", "id" : "Dave Cross", + "name" : "Dave Cross", "data" : [ [ "Perl 5", @@ -63,46 +54,70 @@ ] }, { + "id" : "Lars Balker", + "name" : "Lars Balker", "data" : [ [ "Perl 5", 2 ] - ], - "id" : "Lars Balker", - "name" : "Lars Balker" + ] + }, + { + "id" : "Markus Holzer", + "name" : "Markus Holzer", + "data" : [ + [ + "Perl 6", + 2 + ] + ] }, { - "name" : "Simon Proctor", "data" : [ [ "Perl 6", 2 ] ], - "id" : "Simon Proctor" + "id" : "Simon Proctor", + "name" : "Simon Proctor" }, { - "id" : "Yet Ebreo", "data" : [ [ "Perl 5", 2 ] ], + "id" : "Yet Ebreo", "name" : "Yet Ebreo" } ] }, - "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/>", - "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/>" + }, + "title" : { + "text" : "Perl Weekly Challenge - 032" + }, + "plotOptions" : { + "series" : { + "borderWidth" : 0, + "dataLabels" : { + "format" : "{point.y}", + "enabled" : 1 + } + } }, "chart" : { "type" : "column" + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } } } diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json index 5e18e20631..6c136e54cc 100644 --- a/stats/pwc-language-breakdown-summary.json +++ b/stats/pwc-language-breakdown-summary.json @@ -1,37 +1,6 @@ { - "yAxis" : { - "title" : { - "text" : null - }, - "min" : 0 - }, - "legend" : { - "enabled" : "false" - }, - "title" : { - "text" : "Perl Weekly Challenge Contributions - 2019" - }, - "subtitle" : { - "text" : "Last updated at 2019-10-28 16:55:31 GMT" - }, - "tooltip" : { - "pointFormat" : "<b>{point.y:.0f}</b>" - }, "series" : [ { - "name" : "Contributions", - "dataLabels" : { - "align" : "right", - "y" : 10, - "format" : "{point.y:.0f}", - "style" : { - "fontFamily" : "Verdana, sans-serif", - "fontSize" : "13px" - }, - "enabled" : "true", - "color" : "#FFFFFF", - "rotation" : -90 - }, "data" : [ [ "Blog", @@ -43,21 +12,52 @@ ], [ "Perl 6", - 780 + 782 ] - ] + ], + "name" : "Contributions", + "dataLabels" : { + "format" : "{point.y:.0f}", + "y" : 10, + "align" : "right", + "rotation" : -90, + "style" : { + "fontSize" : "13px", + "fontFamily" : "Verdana, sans-serif" + }, + "enabled" : "true", + "color" : "#FFFFFF" + } } ], + "tooltip" : { + "pointFormat" : "<b>{point.y:.0f}</b>" + }, + "subtitle" : { + "text" : "Last updated at 2019-10-28 21:42:21 GMT" + }, + "legend" : { + "enabled" : "false" + }, + "yAxis" : { + "min" : 0, + "title" : { + "text" : null + } + }, "chart" : { "type" : "column" }, + "title" : { + "text" : "Perl Weekly Challenge Contributions - 2019" + }, "xAxis" : { - "type" : "category", "labels" : { "style" : { - "fontFamily" : "Verdana, sans-serif", - "fontSize" : "13px" + "fontSize" : "13px", + "fontFamily" : "Verdana, sans-serif" } - } + }, + "type" : "category" } } diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json index b6562bd67d..198e0244bc 100644 --- a/stats/pwc-language-breakdown.json +++ b/stats/pwc-language-breakdown.json @@ -1,12 +1,209 @@ { + "series" : [ + { + "data" : [ + { + "drilldown" : "001", + "name" : "#001", + "y" : 132 + }, + { + "y" : 104, + "name" : "#002", + "drilldown" : "002" + }, + { + "drilldown" : "003", + "name" : "#003", + "y" : 67 + }, + { + "y" : 86, + "name" : "#004", + "drilldown" : "004" + }, + { + "drilldown" : "005", + "y" : 66, + "name" : "#005" + }, + { + "drilldown" : "006", + "name" : "#006", + "y" : 48 + }, + { + "y" : 56, + "name" : "#007", + "drilldown" : "007" + }, + { + "drilldown" : "008", + "y" : 70, + "name" : "#008" + }, + { + "y" : 68, + "name" : "#009", + "drilldown" : "009" + }, + { + "y" : 60, + "name" : "#010", + "drilldown" : "010" + }, + { + "drilldown" : "011", + "y" : 78, + "name" : "#011" + }, + { + "y" : 83, + "name" : "#012", + "drilldown" : "012" + }, + { + "drilldown" : "013", + "y" : 76, + "name" : "#013" + }, + { + "drilldown" : "014", + "name" : "#014", + "y" : 96 + }, + { + "drilldown" : "015", + "name" : "#015", + "y" : 93 + }, + { + "drilldown" : "016", + "y" : 66, + "name" : "#016" + }, + { + "drilldown" : "017", + "y" : 79, + "name" : "#017" + }, + { + "y" : 76, + "name" : "#018", + "drilldown" : "018" + }, + { + "y" : 95, + "name" : "#019", + "drilldown" : "019" + }, + { + "name" : "#020", + "y" : 95, + "drilldown" : "020" + }, + { + "drilldown" : "021", + "y" : 67, + "name" : "#021" + }, + { + "drilldown" : "022", + "y" : 63, + "name" : "#022" + }, + { + "y" : 91, + "name" : "#023", + "drilldown" : "023" + }, + { + "drilldown" : "024", + "y" : 70, + "name" : "#024" + }, + { + "name" : "#025", + "y" : 55, + "drilldown" : "025" + }, + { + "drilldown" : "026", + "y" : 70, + "name" : "#026" + }, + { + "name" : "#027", + "y" : 58, + "drilldown" : "027" + }, + { + "drilldown" : "028", + "y" : 78, + "name" : "#028" + }, + { + "drilldown" : "029", + "y" : 76, + "name" : "#029" + }, + { + "drilldown" : "030", + "name" : "#030", + "y" : 114 + }, + { + "name" : "#031", + "y" : 84, + "drilldown" : "031" + }, + { + "name" : "#032", + "y" : 10, + "drilldown" : "032" + } + ], + "colorByPoint" : "true", + "name" : "Perl Weekly Challenge Languages" + } + ], + "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>" + }, + "subtitle" : { + "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-10-28 21:42:21 GMT" + }, + "legend" : { + "enabled" : "false" + }, + "plotOptions" : { + "series" : { + "borderWidth" : 0, + "dataLabels" : { + "format" : "{point.y}", + "enabled" : 1 + } + } + }, + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, + "title" : { + "text" : "Perl Weekly Challenge Language" + }, + "chart" : { + "type" : "column" + }, "xAxis" : { "type" : "category" }, "drilldown" : { "series" : [ { - "id" : "001", - "name" : "001", "data" : [ [ "Perl 5", @@ -20,7 +217,9 @@ "Blog", 11 ] - ] + ], + "name" : "001", + "id" : "001" }, { "data" : [ @@ -41,7 +240,6 @@ "id" : "002" }, { - "name" : "003", "data" : [ [ "Perl 5", @@ -56,10 +254,12 @@ 9 ] ], - "id" : "003" + "id" : "003", + "name" : "003" }, { "id" : "004", + "name" : "004", "data" : [ [ "Perl 5", @@ -73,8 +273,7 @@ "Blog", 9 ] - ], - "name" : "004" + ] }, { "data" : [ @@ -95,7 +294,6 @@ "id" : "005" }, { - "id" : "006", "data" : [ [ "Perl 5", @@ -110,9 +308,11 @@ 7 ] ], + "id" : "006", "name" : "006" }, { + "name" : "007", "id" : "007", "data" : [ [ @@ -127,12 +327,11 @@ "Blog", 10 ] - ], - "name" : "007" + ] }, { - "id" : "008", "name" : "008", + "id" : "008", "data" : [ [ "Perl 5", @@ -149,6 +348,7 @@ ] }, { + "id" : "009", "name" : "009", "data" : [ [ @@ -163,8 +363,7 @@ "Blog", 13 ] - ], - "id" : "009" + ] }, { "data" : [ @@ -185,7 +384,6 @@ "id" : "010" }, { - "name" : "011", "data" : [ [ "Perl 5", @@ -200,9 +398,12 @@ 9 ] ], - "id" : "011" + "id" : "011", + "name" : "011" }, { + "name" : "012", + "id" : "012", "data" : [ [ "Perl 5", @@ -216,12 +417,11 @@ "Blog", 11 ] - ], - "name" : "012", - "id" : "012" + ] }, { "id" : "013", + "name" : "013", "data" : [ [ "Perl 5", @@ -235,11 +435,9 @@ "Blog", 13 ] - ], - "name" : "013" + ] }, { - "name" : "014", "data" : [ [ "Perl 5", @@ -254,9 +452,12 @@ 15 ] ], - "id" : "014" + "id" : "014", + "name" : "014" }, { + "name" : "015", + "id" : "015", "data" : [ [ "Perl 5", @@ -270,12 +471,11 @@ "Blog", 15 ] - ], - "name" : "015", - "id" : "015" + ] }, { "name" : "016", + "id" : "016", "data" : [ [ "Perl 5", @@ -289,10 +489,10 @@ "Blog", 12 ] - ], - "id" : "016" + ] }, { + "id" : "017", "name" : "017", "data" : [ [ @@ -307,11 +507,9 @@ "Blog", 12 ] - ], - "id" : "017" + ] }, { - "name" : "018", "data" : [ [ "Perl 5", @@ -326,10 +524,10 @@ 14 ] ], - "id" : "018" + "id" : "018", + "name" : "018" }, { - "id" : "019", "data" : [ [ "Perl 5", @@ -344,10 +542,12 @@ 13 ] ], - "name" : "019" + "name" : "019", + "id" : "019" }, { "id" : "020", + "name" : "020", "data" : [ [ "Perl 5", @@ -361,11 +561,11 @@ "Blog", 13 ] - ], - "name" : "020" + ] }, { "name" : "021", + "id" : "021", "data" : [ [ "Perl 5", @@ -379,10 +579,10 @@ "Blog", 10 ] - ], - "id" : "021" + ] }, { + "id" : "022", "name" : "022", "data" : [ [ @@ -397,10 +597,10 @@ "Blog", 10 ] - ], - "id" : "022" + ] }, { + "name" : "023", "id" : "023", "data" : [ [ @@ -415,11 +615,11 @@ "Blog", 12 ] - ], - "name" : "023" + ] }, { "name" : "024", + "id" : "024", "data" : [ [ "Perl 5", @@ -433,8 +633,7 @@ "Blog", 11 ] - ], - "id" : "024" + ] }, { "id" : "025", @@ -455,7 +654,6 @@ ] }, { - "id" : "026", "data" : [ [ "Perl 5", @@ -470,10 +668,10 @@ 10 ] ], - "name" : "026" + "name" : "026", + "id" : "026" }, { - "id" : "027", "data" : [ [ "Perl 5", @@ -488,6 +686,7 @@ 9 ] ], + "id" : "027", "name" : "027" }, { @@ -510,6 +709,7 @@ }, { "name" : "029", + "id" : "029", "data" : [ [ "Perl 5", @@ -523,11 +723,9 @@ "Blog", 11 ] - ], - "id" : "029" + ] }, { - "id" : "030", "data" : [ [ "Perl 5", @@ -542,10 +740,10 @@ 9 ] ], + "id" : "030", "name" : "030" }, { - "name" : "031", "data" : [ [ "Perl 5", @@ -560,7 +758,8 @@ 6 ] ], - "id" : "031" + "id" : "031", + "name" : "031" }, { "id" : "032", @@ -572,7 +771,7 @@ ], [ "Perl 6", - 2 + 4 ], [ "Blog", @@ -581,204 +780,5 @@ ] } ] - }, - "yAxis" : { - "title" : { - "text" : "Total Solutions" - } - }, - "plotOptions" : { - "series" : { - "borderWidth" : 0, - "dataLabels" : { - "format" : "{point.y}", - "enabled" : 1 - } - } - }, - "title" : { - "text" : "Perl Weekly Challenge Language" - }, - "legend" : { - "enabled" : "false" - }, - "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/>" - }, - "subtitle" : { - "text" : "Click the columns to drilldown the language breakdown. Last updated at 2019-10-28 16:55:32 GMT" - }, - "series" : [ - { - "colorByPoint" : "true", - "name" : "Perl Weekly Challenge Languages", - "data" : [ - { - "y" : 132, - "name" : "#001", - "drilldown" : "001" - }, - { - "name" : "#002", - "y" : 104, - "drilldown" : "002" - }, - { - "drilldown" : "003", - "y" : 67, - "name" : "#003" - }, - { - "drilldown" : "004", - "y" : 86, - "name" : "#004" - }, - { - "name" : "#005", - "y" : 66, - "drilldown" : "005" - }, - { - "drilldown" : "006", - "y" : 48, - "name" : "#006" - }, - { - "y" : 56, - "name" : "#007", - "drilldown" : "007" - }, - { - "name" : "#008", - "y" : 70, - "drilldown" : "008" - }, - { - "drilldown" : "009", - "name" : "#009", - "y" : 68 - }, - { - "y" : 60, - "name" : "#010", - "drilldown" : "010" - }, - { - "name" : "#011", - "y" : 78, - "drilldown" : "011" - }, - { - "drilldown" : "012", - "name" : "#012", - "y" : 83 - }, - { - "name" : "#013", - "y" : 76, - "drilldown" : "013" - }, - { - "drilldown" : "014", - "name" : "#014", - "y" : 96 - }, - { - "name" : "#015", - "y" : 93, - "drilldown" : "015" - }, - { - "drilldown" : "016", - "y" : 66, - "name" : "#016" - }, - { - "name" : "#017", - "y" : 79, - "drilldown" : "017" - }, - { - "name" : "#018", - "y" : 76, - "drilldown" : "018" - }, - { - "drilldown" : "019", - "y" : 95, - "name" : "#019" - }, - { - "drilldown" : "020", - "name" : "#020", - "y" : 95 - }, - { - "drilldown" : "021", - "name" : "#021", - "y" : 67 - }, - { - "drilldown" : "022", - "y" : 63, - "name" : "#022" - }, - { - "drilldown" : "023", - "y" : 91, - "name" : "#023" - }, - { - "drilldown" : "024", - "name" : "#024", - "y" : 70 - }, - { - "drilldown" : "025", - "name" : "#025", - "y" : 55 - }, - { - "drilldown" : "026", - "name" : "#026", - "y" : 70 - }, - { - "drilldown" : "027", - "y" : 58, - "name" : "#027" - }, - { - "drilldown" : "028", - "y" : 78, - "name" : "#028" - }, - { - "y" : 76, - "name" : "#029", - "drilldown" : "029" - }, - { - "y" : 114, - "name" : "#030", - "drilldown" : "030" - }, - { - "name" : "#031", - "y" : 84, - "drilldown" : "031" - }, - { - "drilldown" : "032", - "name" : "#032", - "y" : 8 - } - ] - } - ], - "chart" : { - "type" : "column" } } diff --git a/stats/pwc-leaders.json b/stats/pwc-leaders.json index d59b8feb4a..1268f898a4 100644 --- a/stats/pwc-leaders.json +++ b/stats/pwc-leaders.json @@ -1,83 +1,92 @@ { - "chart" : { - "type" : "column" + "legend" : { + "enabled" : "false" }, - "xAxis" : { - "type" : "category" + "yAxis" : { + "title" : { + "text" : "Total Score" + } + }, + "tooltip" : { + "followPointer" : "true", + "headerFormat" : "<span style=\"font-size:11px\"></span>", + "pointFormat" : "<span style=\"color:{point.color}\">{point.name}</span>: <b>{point.y:f}</b><br/>" + }, + "title" : { + "text" : "Perl Weekly Challenge Leaders (TOP 50)" }, "series" : [ { "colorByPoint" : "true", - "name" : "Perl Weekly Challenge Leaders", "data" : [ { - "y" : 390, + "drilldown" : "Laurent Rosenfeld", "name" : "#1: Laurent Rosenfeld", - "drilldown" : "Laurent Rosenfeld" + "y" : 390 }, { - "y" : 314, + "drilldown" : "Joelle Maslak", "name" : "#2: Joelle Maslak", - "drilldown" : "Joelle Maslak" + "y" : 314 }, { |
