diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2019-09-17 12:26:29 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2019-09-17 12:26:29 +0100 |
| commit | ab98ce23a507882351339483b3215e75d46c50f4 (patch) | |
| tree | 379aa056ddb972daeb788f1b6265489d0fe1a09d | |
| parent | 4f6cc4f1da13691ebd046ce0959ce9140b990ec8 (diff) | |
| download | perlweeklychallenge-club-ab98ce23a507882351339483b3215e75d46c50f4.tar.gz perlweeklychallenge-club-ab98ce23a507882351339483b3215e75d46c50f4.tar.bz2 perlweeklychallenge-club-ab98ce23a507882351339483b3215e75d46c50f4.zip | |
- Added solutions by Andrezgz.
36 files changed, 5689 insertions, 5618 deletions
diff --git a/challenge-025/lars-balker/perl5/ch-1.pl b/challenge-025/lars-balker/perl5/ch-1.pl new file mode 100644 index 0000000000..41021a5473 --- /dev/null +++ b/challenge-025/lars-balker/perl5/ch-1.pl @@ -0,0 +1,41 @@ +#!/usr/bin/env perl + +use v5.10; +use strict; +use warnings; + +# Generate a longest sequence of the following “English Pokemon” names +# where each name starts with the last letter of previous name. + +my @names = qw/ + audino bagon baltoy banette bidoof braviary bronzor carracosta + charmeleon cresselia croagunk darmanitan deino emboar emolga + exeggcute gabite girafarig gulpin haxorus heatmor heatran ivysaur + jellicent jumpluff kangaskhan kricketune landorus ledyba loudred + lumineon lunatone machamp magnezone mamoswine nosepass petilil + pidgeotto pikachu pinsir poliwrath poochyena porygon2 porygonz + registeel relicanth remoraid rufflet sableye scolipede scrafty + seaking sealeo silcoon simisear snivy snorlax spoink starly + tirtouga trapinch treecko tyrogue vigoroth vulpix wailord + wartortle whismur wingull yamask +/; + +my $longest = []; + +try([], "", @names); + +say "@$longest"; + +# naive brute force recursion +sub try { + my ($picks, $prefix, @rest) = @_; + + $longest = $picks if @$picks > @$longest; + + for (my $i = 0; $i < @rest; ++$i) { + next unless $rest[$i] =~ /^$prefix/; + try([@$picks, $rest[$i]], + substr($rest[$i], -1), + @rest[0..$i-1, $i+1..$#rest]); + } +} diff --git a/stats/pwc-challenge-001.json b/stats/pwc-challenge-001.json index d64b6376c3..91fe3beed0 100644 --- a/stats/pwc-challenge-001.json +++ b/stats/pwc-challenge-001.json @@ -1,24 +1,324 @@ { + "yAxis" : { + "title" : { + "text" : "Total Solutions" + } + }, + "title" : { + "text" : "Perl Weekly Challenge - 001" + }, + "series" : [ + { + "colorByPoint" : 1, + "data" : [ + { + "y" : 3, + "drilldown" : "Adam Russell", + "name" : "Adam Russell" + }, + { + "name" : "Ailbhe Tweedie", + "y" : 1, + "drilldown" : "Ailbhe Tweedie" + }, + { + "y" : 2, + "drilldown" : "Alex Daniel", + "name" : "Alex Daniel" + }, + { + "drilldown" : "Andrezgz", + "y" : 2, + "name" : "Andrezgz" + }, + { + "y" : 2, + "drilldown" : "Antonio Gamiz", + "name" : "Antonio Gamiz" + }, + { + "y" : 5, + "drilldown" : "Arne Sommer", + "name" : "Arne Sommer" + }, + { + "name" : "Arpad Toth", + "y" : 2, + "drilldown" : "Arpad Toth" + }, + { + "drilldown" : "Athanasius", + "y" : 2, + "name" : "Athanasius" + }, + { + "y" : 2, + "drilldown" : "Bob Kleemann", + "name" : "Bob Kleemann" + }, + { + "drilldown" : "Daniel Mantovani", + "y" : 1, + "name" : "Daniel Mantovani" + }, + { + "y" : 3, + "drilldown" : "Dave Cross", + "name" : "Dave Cross" + }, + { + "drilldown" : "Dave Jacoby", + "y" : 2, + "name" : "Dave Jacoby" + }, + { + "y" : 2, + "drilldown" : "David Kayal", + "name" : "David Kayal" + }, + { + "drilldown" : "Doug Schrag", + "y" : 2, + "name" : "Doug Schrag" + }, + { + "y" : 4, + "drilldown" : "Dr James A. Smith", + "name" : "Dr James A. Smith" + }, + { + "name" : "Duncan C. White", + "y" : 2, + "drilldown" : "Duncan C. White" + }, + { + "name" : "Eddy HS", + "drilldown" : "Eddy HS", + "y" : 2 + }, + { + "y" : 2, + "drilldown" : "Finley", + "name" : "Finley" + }, + { + "drilldown" : "Fred Zinn", + "y" : 1, + "name" : "Fred Zinn" + }, + { + "name" : "Freddie B", + "y" : 2, + "drilldown" : "Freddie B" + }, + { + "drilldown" : "Gustavo Chaves", + "y" : 1, + "name" : "Gustavo Chaves" + }, + { + "drilldown" : "JJ Merelo", + "y" : 2, + "name" : "JJ Merelo" + }, + { + "name" : "Jaldhar H. Vyas", + "y" : 4, + "drilldown" : "Jaldhar H. Vyas" + }, + { + "name" : "Jeff", + "drilldown" : "Jeff", + "y" : 2 + }, + { + "name" : "Jeremy Carman", + "drilldown" : "Jeremy Carman", + "y" : 2 + }, + { + "y" : 1, + "drilldown" : "Jim Bacon", + "name" : "Jim Bacon" + }, + { + "name" : "Jo Christian Oterhals", + "drilldown" : "Jo Christian Oterhals", + "y" : 5 + }, + { + "name" : "Joelle Maslak", + "y" : 4, + "drilldown" : "Joelle Maslak" + }, + { + "drilldown" : "John Barrett", + "y" : 1, + "name" : "John Barrett" + }, + { + "name" : "Juan Caballero", + "y" : 2, + "drilldown" : "Juan Caballero" + }, + { + "name" : "Khalid", + "drilldown" : "Khalid", + "y" : 2 + }, + { + "name" : "Kian-Meng Ang", + "drilldown" : "Kian-Meng Ang", + "y" : 3 + }, + { + "name" : "Kivanc Yazan", + "drilldown" : "Kivanc Yazan", + "y" : 2 + }, + { + "drilldown" : "Lars Balker", + "y" : 4, + "name" : "Lars Balker" + }, + { + "name" : "Laurent Rosenfeld", + "y" : 4, + "drilldown" : "Laurent Rosenfeld" + }, + { + "y" : 2, + "drilldown" : "Mark Senn", + "name" : "Mark Senn" + }, + { + "name" : "Martin Mugeni", + "y" : 2, + "drilldown" : "Martin Mugeni" + }, + { + "name" : "Neil Bowers", + "y" : 1, + "drilldown" : "Neil Bowers" + }, + { + "name" : "Nick Logan", + "y" : 4, + "drilldown" : "Nick Logan" + }, + { + "y" : 2, + "drilldown" : "Oleksii Tsvietnov", + "name" : "Oleksii Tsvietnov" + }, + { + "name" : "Ozzy", + "drilldown" : "Ozzy", + "y" : 2 + }, + { + "y" : 2, + "drilldown" : "Pavel Jurca", + "name" : "Pavel Jurca" + }, + { + "name" : "Pete Houston", + "drilldown" : "Pete Houston", + "y" : 2 + }, + { + "y" : 3, + "drilldown" : "Philippe Bruhat", + "name" : "Philippe Bruhat" + }, + { + "drilldown" : "Prajith P", + "y" : 1, + "name" : "Prajith P" + }, + { + "drilldown" : "Sean Meininger", + "y" : 2, + "name" : "Sean Meininger" + }, + { + "name" : "Simon Proctor", + "drilldown" : "Simon Proctor", + "y" : 6 + }, + { + "name" : "Simon Reinhardt", + "drilldown" : "Simon Reinhardt", + "y" : 2 + }, + { + "y" : 4, + "drilldown" : "Steve Rogerson", + "name" : "Steve Rogerson" + }, + { + "name" : "Steven Wilson", + "y" : 2, + "drilldown" : "Steven Wilson" + }, + { + "name" : "Tiago Stock", + "drilldown" : "Tiago Stock", + "y" : 1 + }, + { + "name" : "Tore Andersson", + "drilldown" : "Tore Andersson", + "y" : 2 + }, + { + "name" : "Veesh Goldman", + "y" : 1, + "drilldown" : "Veesh Goldman" + }, + { + "drilldown" : "William Gilmore", + "y" : 1, + "name" : "William Gilmore" + }, + { + "drilldown" : "Yet Ebreo", + "y" : 4, + "name" : "Yet Ebreo" + } + ], + "name" : "Perl Weekly Challenge - 001" + } + ], + "tooltip" : { + "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/>", + "followPointer" : 1 + }, "chart" : { "type" : "column" }, "subtitle" : { - "text" : "[Champions: 55] Last updated at 2019-09-15 17:47:38 GMT" + "text" : "[Champions: 55] Last updated at 2019-09-17 11:25:19 GMT" }, "plotOptions" : { "series" : { "borderWidth" : 0, "dataLabels" : { - "enabled" : 1, - "format" : "{point.y}" + "format" : "{point.y}", + "enabled" : 1 } } }, + "xAxis" : { + "type" : "category" + }, + "legend" : { + "enabled" : 0 + }, "drilldown" : { "series" : [ { - "id" : "Adam Russell", - "name" : "Adam Russell", "data" : [ [ "Perl 5", @@ -28,7 +328,9 @@ "Blog", 1 ] - ] + ], + "name" : "Adam Russell", + "id" : "Adam Russell" }, { "data" : [ @@ -51,27 +353,27 @@ "id" : "Alex Daniel" }, { + "name" : "Andrezgz", "data" : [ [ "Perl 5", 2 ] ], - "name" : "Andrezgz", "id" : "Andrezgz" }, { - "name" : "Antonio Gamiz", "data" : [ [ "Perl 6", 2 ] ], + "name" : "Antonio Gamiz", "id" : "Antonio Gamiz" }, { - "id" : "Arne Sommer", + "name" : "Arne Sommer", "data" : [ [ "Perl 5", @@ -86,17 +388,17 @@ 1 ] ], - "name" : "Arne Sommer" + "id" : "Arne Sommer" }, { - "id" : "Arpad Toth", + "name" : "Arpad Toth", "data" : [ [ "Perl 5", 2 ] ], - "name" : "Arpad Toth" + "id" : "Arpad Toth" }, { "id" : "Athanasius", @@ -109,13 +411,13 @@ ] }, { - "name" : "Bob Kleemann", "data" : [ [ "Perl 5", 2 ] ], + "name" : "Bob Kleemann", "id" : "Bob Kleemann" }, { @@ -129,7 +431,6 @@ ] }, { - "id" : "Dave Cross", "data" : [ [ "Perl 5", @@ -140,9 +441,11 @@ 1 ] ], - "name" : "Dave Cross" + "name" : "Dave Cross", + "id" : "Dave Cross" }, { + "id" : "Dave Jacoby", "data" : [ [ "Perl 5", @@ -153,8 +456,7 @@ 1 ] ], - "name" : "Dave Jacoby", - "id" : "Dave Jacoby" + "name" : "Dave Jacoby" }, { "name" : "David Kayal", @@ -167,17 +469,17 @@ "id" : "David Kayal" }, { + "id" : "Doug Schrag", + "name" : "Doug Schrag", "data" : [ [ "Perl 6", 2 ] - ], - "name" : "Doug Schrag", - "id" : "Doug Schrag" + ] }, { - "id" : "Dr James A. Smith", + "name" : "Dr James A. Smith", "data" : [ [ "Perl 5", @@ -188,70 +490,69 @@ 2 ] ], - "name" : "Dr James A. Smith" + "id" : "Dr James A. Smith" }, { - "name" : "Duncan C. White", + "id" : "Duncan C. White", "data" : [ [ "Perl 5", 2 ] ], - "id" : "Duncan C. White" + "name" : "Duncan C. White" }, { + "id" : "Eddy HS", "data" : [ [ "Perl 5", 2 ] ], - "name" : "Eddy HS", - "id" : "Eddy HS" + "name" : "Eddy HS" }, { - "id" : "Finley", - "name" : "Finley", "data" : [ [ "Perl 6", 2 ] - ] + ], + "name" : "Finley", + "id" : "Finley" }, { + "name" : "Fred Zinn", "data" : [ [ "Perl 5", 1 ] ], - "name" : "Fred Zinn", "id" : "Fred Zinn" }, { - "name" : "Freddie B", "data" : [ [ "Perl 5", 2 ] ], + "name" : "Freddie B", "id" : "Freddie B" }, { "id" : "Gustavo Chaves", - "name" : "Gustavo Chaves", "data" : [ [ "Perl 5", 1 ] - ] + ], + "name" : "Gustavo Chaves" }, { - "name" : "JJ Merelo", "data" : [ [ "Perl 6", @@ -262,6 +563,7 @@ 1 ] ], + "name" : "JJ Merelo", "id" : "JJ Merelo" }, { @@ -279,14 +581,14 @@ "id" : "Jaldhar H. Vyas" }, { + "id" : "Jeff", "name" : "Jeff", "data" : [ [ "Perl 5", 2 ] - ], - "id" : "Jeff" + ] }, { "id" : "Jeremy Carman", @@ -303,16 +605,17 @@ "name" : "Jeremy Carman" }, { + "name" : "Jim Bacon", "data" : [ [ "Perl 5", 1 ] ], - "name" : "Jim Bacon", "id" : "Jim Bacon" }, { + "id" : "Jo Christian Oterhals", "name" : "Jo Christian Oterhals", "data" : [ [ @@ -327,8 +630,7 @@ "Blog", 1 ] - ], - "id" : "Jo Christian Oterhals" + ] }, { "id" : "Joelle Maslak", @@ -345,37 +647,37 @@ "name" : "Joelle Maslak" }, { - "name" : "John Barrett", "data" : [ [ "Perl 5", 1 ] ], + "name" : "John Barrett", "id" : "John Barrett" }, { "id" : "Juan Caballero", - "name" : "Juan Caballero", "data" : [ [ "Perl 5", 2 ] - ] + ], + "name" : "Juan Caballero" }, { - "name" : "Khalid", + "id" : "Khalid", "data" : [ [ "Perl 5", 2 ] ], - "id" : "Khalid" + "name" : "Khalid" }, { - "id" : "Kian-Meng Ang", + "name" : "Kian-Meng Ang", "data" : [ [ "Perl 5", @@ -386,19 +688,21 @@ 1 ] ], - "name" : "Kian-Meng Ang" + "id" : "Kian-Meng Ang" }, { - "id" : "Kivanc Yazan", "name" : "Kivanc Yazan", "data" : [ [ "Perl 5", 2 ] - ] + ], + "id" : "Kivanc Yazan" }, { + "id" : "Lars Balker", + "name" : "Lars Balker", "data" : [ [ "Perl 5", @@ -408,9 +712,7 @@ "Perl 6", 2 ] - ], - "name" : "Lars Balker", - "id" : "Lars Balker" + ] }, { "id" : "Laurent Rosenfeld", @@ -441,14 +743,14 @@ "id" : "Mark Senn" }, { + "id" : "Martin Mugeni", + "name" : "Martin Mugeni", "data" : [ [ "Perl 6", 2 ] - ], - "name" : "Martin Mugeni", - "id" : "Martin Mugeni" + ] }, { "id" : "Neil Bowers", @@ -485,36 +787,37 @@ "id" : "Oleksii Tsvietnov" }, { + "id" : "Ozzy", + "name" : "Ozzy", "data" : [ [ "Perl 6", 2 ] - ], - "name" : "Ozzy", - "id" : "Ozzy" + ] }, { - "id" : "Pavel Jurca", "data" : [ [ "Perl 5", 2 ] ], - "name" : "Pavel Jurca" + "name" : "Pavel Jurca", + "id" : "Pavel Jurca" }, { + "id" : "Pete Houston", "data" : [ [ "Perl 5", 2 ] ], - "name" : "Pete Houston", - "id" : "Pete Houston" + "name" : "Pete Houston" }, { + "id" : "Philippe Bruhat", "name" : "Philippe Bruhat", "data" : [ [ @@ -525,8 +828,7 @@ "Blog", 1 ] - ], - "id" : "Philippe Bruhat" + ] }, { "id" : "Prajith P", @@ -539,16 +841,17 @@ ] }, { - "id" : "Sean Meininger", "name" : "Sean Meininger", "data" : [ [ "Perl 6", 2 ] - ] + ], + "id" : "Sean Meininger" }, { + "id" : "Simon Proctor", "name" : "Simon Proctor", "data" : [ [ @@ -563,17 +866,16 @@ "Blog", 2 ] - ], - "id" : "Simon Proctor" + ] }, { - "name" : "Simon Reinhardt", "data" : [ [ "Perl 5", 2 ] ], + "name" : "Simon Reinhardt", "id" : "Simon Reinhardt" }, { @@ -602,23 +904,23 @@ }, { "id" : "Tiago Stock", - "name" : "Tiago Stock", "data" : [ [ "Perl 5", 1 ] - ] + ], + "name" : "Tiago Stock" }, { - "name" : "Tore Andersson", + "id" : "Tore Andersson", "data" : [ [ "Perl 5", 2 ] ], - "id" : "Tore Andersson" + "name" : "Tore Andersson" }, { "name" : "Veesh Goldman", @@ -631,17 +933,17 @@ "id" : "Veesh Goldman" }, { - "id" : "William Gilmore", "name" : "William Gilmore", "data" : [ [ "Perl 5", 1 ] - ] + ], + "id" : "William Gilmore" }, { - "name" : "Yet Ebreo", + "id" : "Yet Ebreo", "data" : [ [ "Perl 5", @@ -652,310 +954,8 @@ 2 ] ], - "id" : "Yet Ebreo" + "name" : "Yet Ebreo" } ] - }, |
