Initial version
parent
7555ab706b
commit
f94f2e531d
|
@ -0,0 +1,74 @@
|
|||
package DDG::Goodie::NameDays;
|
||||
# ABSTRACT: Display Name Days for a given name or date
|
||||
|
||||
use strict;
|
||||
use DateTime;
|
||||
use DDG::Goodie;
|
||||
with 'DDG::GoodieRole::Dates';
|
||||
|
||||
zci answer_type => "name_days_w25";
|
||||
zci is_cached => 1;
|
||||
|
||||
# Metadata
|
||||
name "Name Days";
|
||||
source "https://en.wikipedia.org/wiki/Name_days_in_Poland";
|
||||
description "Name Days for a given name or date";
|
||||
primary_example_queries "name day Maria", "1 June name day";
|
||||
secondary_example_queries "name days today";
|
||||
category "dates";
|
||||
topics "social", "everyday";
|
||||
code_url "https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/lib/DDG/Goodie/NameDays/W25/W25.pm";
|
||||
attribution github => ["http://github.com/W25", "W25"];
|
||||
|
||||
# Triggers
|
||||
triggers any => "name day", "name days", "nameday", "namedays", "imieniny";
|
||||
|
||||
# Load the data file
|
||||
my @names = share('Poland.txt')->slurp(iomode => '<:encoding(UTF-8)'); # Names indexed by day
|
||||
my %dates = (); # Days indexed by name
|
||||
|
||||
sub load_days {
|
||||
my $day_of_year = 1;
|
||||
|
||||
# Read names for each day and add them to the hash
|
||||
for my $names_for_date (@names) {
|
||||
for my $name (split(' ', $names_for_date)) {
|
||||
push(@{$dates{$name}}, $day_of_year);
|
||||
}
|
||||
|
||||
# Advance to the next day
|
||||
$day_of_year++;
|
||||
}
|
||||
}
|
||||
|
||||
load_days();
|
||||
|
||||
my $datestring_regex = datestring_regex();
|
||||
|
||||
# Handle statement
|
||||
handle remainder => sub {
|
||||
if (exists $dates{lc($_)}) {
|
||||
# Return all dates corresponding to this name
|
||||
my @ret = ();
|
||||
foreach (@{$dates{lc($_)}}) {
|
||||
# Any leap year here, because the text file includes February, 29
|
||||
my $d = DateTime->from_day_of_year(year => 2000, day_of_year => $_);
|
||||
push(@ret, $d->strftime('%e %b'));
|
||||
}
|
||||
return join(', ', @ret);
|
||||
}
|
||||
|
||||
return unless $_ =~ qr/^($datestring_regex)$/;
|
||||
|
||||
my $day = parse_datestring_to_date($1);
|
||||
|
||||
$day->set_year(2000); # Any leap year here
|
||||
|
||||
my $ret = $names[$day->day_of_year()];
|
||||
|
||||
chomp($ret);
|
||||
|
||||
return $ret;
|
||||
};
|
||||
|
||||
1;
|
|
@ -0,0 +1,366 @@
|
|||
mieczysław mieszko
|
||||
abel achacy achacjusz aspazja bazyli izydor jakobina jakubina makary narcyz stefania strzeżysław sylwester sylwestra telesfor
|
||||
danuta piotr genowefa
|
||||
angelika aniela dobromir eugeniusz grzegorz izabela
|
||||
edward emilian hania szymon
|
||||
andrzej bolemir kacper kasper melchior baltazar
|
||||
julian lucjan walenty
|
||||
mścisław seweryn
|
||||
antoni borzymir julian julianna
|
||||
dobrosław jan paweł
|
||||
feliks krzesimir matylda
|
||||
antoni arkadiusz benedykt czesław czesława ernest
|
||||
bogumił bogusława weronika
|
||||
feliks radogost felkis felkis
|
||||
aleksander dąbrówka dobrawa domasław paweł
|
||||
marcel włodzimierz kevin
|
||||
antoni jan rościsław
|
||||
bogumił jaropełk krystyna małgorzata piotr
|
||||
andrzej bernard erwin henryk mariusz marta racimir sara
|
||||
dobiegniew fabian sebastian
|
||||
agnieszka jarosław jarosława marcela
|
||||
anastazy dobromysł dorian marta wincenty
|
||||
jan maria
|
||||
felicja mirogniew rafaela rafał tymoteusz
|
||||
miłosz miłowan miłowit paweł tatiana maleszka
|
||||
paula paulina wanda
|
||||
angelika ilona julian
|
||||
agnieszka augustyn julian karol piotr radomir
|
||||
hanna walerian zdzisław
|
||||
feliks gerard maciej marcin martyna sebastian
|
||||
euzebiusz jan piotr
|
||||
dobrochna iga ignacy paweł siemirad żegota
|
||||
joanna korneliusz maria miłosława rory
|
||||
błażej maksym oskar stefan telimena
|
||||
andrzej gilbert jan joanna józef weronika witosława
|
||||
aga agata jakub jan paweł piotr
|
||||
antoni bogdan bohdan dorota ksenia szymon
|
||||
alfons parteniusz partenia romeusz romuald rozalia ryszard sulisław
|
||||
gniewomir jan paweł piotr sebastian
|
||||
bernard eryk eryka
|
||||
gabriel jacek elwira
|
||||
lucjan maria olgierd świętomira
|
||||
julian laurenty nora
|
||||
grzegorz jordan katarzyna toligniew
|
||||
dobiesława józef konrad krystyna lilian liliana mikołaj niemir niemira zenon cyryl
|
||||
georgina jordan jowita józef klaudiusz
|
||||
bernard dan danuta julianna
|
||||
donata franciszek julian konstanty łukasz niegomir zbigniew zbyszko
|
||||
albert alberta krystiana więcesława zuzanna
|
||||
arnold henryk konrad
|
||||
leon ludmiła ludomiła
|
||||
eleonora feliks teodor
|
||||
marta małgorzata piotr wiktor
|
||||
bądzimir damian piotr roma seweryn
|
||||
bogurad bogusz boguta maciej piotr
|
||||
bolebor cezary maciej małgorzata
|
||||
aleksander bogumił cezariusz mirosław ewelina
|
||||
aleksander anastazja gabriel gabriela sierosława
|
||||
józef roman lech
|
||||
dobronieg roman
|
||||
albin antoni antonina amelia feliks herakles joanna józef piotr
|
||||
franciszek helena henryk krzysztof michał paweł piotr radosław
|
||||
hieronim maryna
|
||||
adrian adrianna arkadiusz eugeniusz kazimierz lucja
|
||||
adrian adrianna fryderyk jan wacław wacława
|
||||
eugenia jordan klaudian róża wiktor wojsław
|
||||
felicja paweł tomasz
|
||||
beata jan julian miligost miłogost stefan
|
||||
dominik franciszka katarzyna
|
||||
aleksander borzysław cyprian
|
||||
benedykt drogosława edwin konstantyn rozyna
|
||||
bernard blizbor grzegorz józefina
|
||||
bożena ernest kasjan krystyna marek
|
||||
bożeciecha jakub leon matylda michał
|
||||
gościmir klemens krzysztof ludwika
|
||||
henryka herbert izabela
|
||||
gertruda jan patryk zbigniew zbyszko
|
||||
aleksander boguchwał cyryl edward
|
||||
bogdan józef
|
||||
aleksander aleksandra bogusław klaudia
|
||||
benedykt lubomira mikołaj
|
||||
bogusław katarzyna kazimierz paweł
|
||||
feliks katarzyna piotr
|
||||
gabriel marek szymon
|
||||
ireneusz łucja lucja lutomysł maria wieńczysław
|
||||
emanuel feliks manuela teodor
|
||||
benedykt ernest jan lidia rupert
|
||||
aniela antoni jan
|
||||
cyryl
|
||||
amelia aniela częstobor jan
|
||||
beniamin dobromira kornelia
|
||||
grażyna katarzyna teodora tolisław zbigniew zbyszko
|
||||
franciszek sądomir władysław władysława
|
||||
antoni cieszygor jakub ryszard
|
||||
benedykt izydor wacław wacława
|
||||
borzywoj irena wincenty jam
|
||||
ada adam ireneusz katarzyna świętobor
|
||||
donata przecław
|
||||
cezary radosław sieciesława
|
||||
dobrosława dymitr maja
|
||||
antoni daniel henryk małgorzata michał
|
||||
filip jaromir leon marek
|
||||
andrzej iwan juliusz siemiodrog wiktor zenon
|
||||
jan justyn małgorzata marcin przemysł przemysław
|
||||
julianna justyn maria myślimir
|
||||
anastazja leonid wacław wacława
|
||||
erwin julia ksenia nikita nosisław
|
||||
jakub józef klara radociech robert rudolf stefan
|
||||
bogusław bogusława gościsław
|
||||
cieszyrad czechasz czesław leon tymon werner włodzimierz
|
||||
agnieszka czechoń czesław nawoj szymon teodor
|
||||
bartosz drogomił feliks konrad
|
||||
kajus kaja łukasz teodor
|
||||
gerard helena jerzy wojciech
|
||||
aleksander erwin grzegorz
|
||||
jarosław marek
|
||||
maria marzena spycimir
|
||||
andrzej bożebor martyn piotr zyta
|
||||
maria paweł
|
||||
angelina augustyn bogusław piotr robert
|
||||
bartłomiej jakub katarzyna marian
|
||||
aniela filip jakub józef lubomir maja
|
||||
walter witomir zygmunt wouter
|
||||
aleksander antonina maria mariola świętosława
|
||||
grzegorz michał monika
|
||||
irena teodor waldemar
|
||||
gościwit jan judyta
|
||||
benedykt bogumir ludmiła ludomiła
|
||||
marek michał piotr stanisław
|
||||
bożydar grzegorz karolina mikołaj
|
||||
częstomir jan
|
||||
filip franciszek iga ignacy lew lutogniew mira żegota
|
||||
dominik jan joanna wszemił pankracy
|
||||
andrzej ciechosław gloria magdalena piotr robert
|
||||
dobiesław wiktor maciej
|
||||
jan zofia
|
||||
andrzej jędrzej szymon wieńczysław
|
||||
bruno sławomir weronika wiktor
|
||||
aleksander aleksandra alicja edwin eryk eryka feliks irena myślibor
|
||||
augustyn celestyn mikołaj pękosław piotr timur
|
||||
bronimir teodor wiktoria
|
||||
donata jan tymoteusz wiktor
|
||||
emil helena jan julia ryta wiesław wiesława wisława
|
||||
budziwoj emilia iwona jan michał
|
||||
cieszysława jan joanna maria zula zuzanna
|
||||
grzegorz imisława maria magdalena
|
||||
filip marianna paulina ewelina więcemił
|
||||
jan juliusz lucjan magdalena radowit
|
||||
augustyn jaromir wiktor wrocimir
|
||||
bogusława maksymilian maria magdalena teodor urszula
|
||||
feliks joanna
|
||||
aniela bożysława teodor
|
||||
bernard jakub konrad magdalena nikodem symeon świętopełk
|
||||
eugeniusz maria marianna mikołaj piotr racisław
|
||||
konstantyn leszek paula tamara
|
||||
franciszek gościmił karol
|
||||
dobrociech dobromir dobrymir
|
||||
dominika norbert paulina więcerad
|
||||
antoni ciechomir jarosław paweł robert wiesław wisław
|
||||
maksym seweryn wyszesław
|
||||
felicjan
|
||||
bogumił edgar małgorzata
|
||||
feliks radomił
|
||||
antonina jan leon wyszemir
|
||||
antoni chociemir lucjan maria magdalena tobiasz
|
||||
eliza justyn justyna ninogniew
|
||||
angelina jolanta witold witołd witolda witosław
|
||||
alina aneta budzimir jan justyna
|
||||
agnieszka drogomysł franciszek laura marcjan radomił
|
||||
elżbieta marek marina paula
|
||||
julianna
|
||||
bogna bogumiła bożena franciszek michał rafaela rafał
|
||||
alicja domamir marta teodor
|
||||
broniwoj paulina
|
||||
józef piotr wanda zenon
|
||||
dan danisz danuta emilia jan
|
||||
lucja łucja tolisława
|
||||
jan paweł
|
||||
maria magdalena władysław władysława
|
||||
ireneusz józef leon paweł
|
||||
dalebor paweł piotr
|
||||
ciechosława emilia lucyna
|
||||
halina marian
|
||||
maria piotr. jagoda
|
||||
jacek leon miłosław
|
||||
elżbieta józef julian teodor wielisław
|
||||
antoni bartłomiej jakub karolina michał
|
||||
chociebor dominik dominika łucja lucja niegosław
|
||||
antoni kira piotr benedykt cyryl
|
||||
adrian adrianna chwalimir edgar elżbieta eugeniusz
|
||||
łucja lucja mikołaj weronika zenon
|
||||
aleksander amelia aniela filip
|
||||
cyprian kalina olga
|
||||
andrzej euzebiusz feliks henryk paweł piotr tolimir weronika
|
||||
ernest eugeniusz jakub justyna małgorzata radomiła sara
|
||||
damian dobrogost franciszek izabela marcelina
|
||||
daniel dawid henryk iga ignacy lubomysł niecisław włodzimierz żegota
|
||||
andrzej maria magdalena marika stefan
|
||||
aleksander andrzej bogdan marcelina maria magdalena aneta
|
||||
erwin kamil karolina robert szymon unisław
|
||||
lutobor wincenty
|
||||
czechoń czesław małgorzata paweł
|
||||
andrzej daniel paulina stojsław wiktor
|
||||
bolesława bolisława maria magdalena milenia więcemiła
|
||||
bogna żelisław
|
||||
antoni kinga krystyna olga wojciecha
|
||||
jakub krzysztof sławosz walentyna
|
||||
anna baldev grażyna mirosława
|
||||
julia marta natalia wszebor
|
||||
marcela świętomir wiktor
|
||||
konstantyn maria marta
|
||||
julia julita ludmiła maryna
|
||||
emilian helena iga ignacy ludomir
|
||||
konrad piotr
|
||||
borzysława karina maria stefan
|
||||
augusta lidia nikodem szczepan
|
||||
dominik maria mironieg
|
||||
emil maria stanisława
|
||||
jakub sława stefan wincenty
|
||||
anna dobiemir donata dorota kajetan
|
||||
cyprian cyryl emil emilian emiliusz
|
||||
jan klarysa miłorad roman
|
||||
bogdan borys
|
||||
aleksander włodzimierz włodziwoj zula zuzanna
|
||||
klara lech piotr
|
||||
diana helena jan kasjan radomiła wojbor
|
||||
dobrowoj euzebiusz
|
||||
maria stefan
|
||||
domarad domarat joachim
|
||||
anastazja angelika anita eliza jacek jaczewoj joanna julianna miron żanna
|
||||
bogusława bronisław bronisz helena ilona klara
|
||||
bolesław emilia jan julian juliusz piotr
|
||||
jan samuel samuela sieciech sobiesław świeciech
|
||||
emilian filipina franciszek joanna kazimiera męcimir
|
||||
cezary dalegor maria namysław tymoteusz zygfryd
|
||||
filip laurenty
|
||||
bartłomiej cieszymir jerzy joanna malina michalina
|
||||
grzegorz luiza michał sieciesław
|
||||
dobroniega joanna konstanty maksym maria
|
||||
cezary józef monika małgorzata teodor
|
||||
adelina aleksander aleksy augustyn patrycja sobiesław stronisław
|
||||
gita jan racibor sabina
|
||||
częstowoj miron rebeka róża szczęsna szczęsny
|
||||
bohdan paulina rajmund świętosław
|
||||
bronisław bronisława bronisz
|
||||
bohdan czesław eliza henryk julian stefan tobiasz witomysł
|
||||
antoni bartłomiej bronisław bronisz izabela jan joachim mojmir szymon wincenty zenon
|
||||
ida lilianna rościgniew róża rozalia
|
||||
dorota justyna stronisława wawrzyniec
|
||||
albin beata eugenia eugeniusz michał uniewit
|
||||
domasława domisława marek regina rena ryszard
|
||||
adrian adrianna maria radosław radosława klementyna
|
||||
augustyna aureliusz piotr ścibor ścibora sergiusz sobiesąd
|
||||
aldona łukasz mikołaj mścibor
|
||||
feliks jacek jan naczesław
|
||||
amadeusz maria piotr sylwin
|
||||
aleksander eugenia filip lubor morzysław szeliga
|
||||
bernard cyprian roksana siemomysł szymon
|
||||
maria nikodem
|
||||
cyprian edyta eugenia franciszek kamila kornel lucja łucja wiktor
|
||||
drogosław franciszek justyn justyna teodora
|
||||
dobrowit irena józef stefania
|
||||
konstancja teodor więcemir
|
||||
agnieszka barbara dionizy eustachiusz eustachy fausta faustyna filipina irena klemens mieczysława miłowuj oleg perpetua protazy
|
||||
bożeciech bożydar jonasz laurenty mateusz mira
|
||||
joachim maurycy prosimir scott tomasz
|
||||
boguchwała bogusław elżbieta krzysztof libert litoriusz liwiusz piotr tekla zachariusz
|
||||
gerard maria teodor tomir uniegost
|
||||
aurelia franciszek kamil ładysław piotr świętopełk wincenty władysław władysława
|
||||
cyprian euzebiusz justyna łękomir
|
||||
amadeusz damian
|
||||
jan luba lubosza marek nikita sylwin wacław wacława więcesław
|
||||
michał rafał gabriel
|
||||
grzegorz hieronim honoriusz imisław rachela wera wiera wiktor zofia
|
||||
danuta remigiusz cieszysław dan danisz danuta igor jan remigiusz
|
||||
stanimir teofil
|
||||
gerard józefa sierosław teresa
|
||||
edwin franciszek konrad rozalia
|
||||
częstogniew donata igor justyn konstancjusz
|
||||
artur bronisław bronisz emil roman
|
||||
justyna marek maria rościsława stefan mirella
|
||||
bryda brygida laurencja marcin wojsława
|
||||
bogdan jan ludwik
|
||||
franciszek lutomir tomił
|
||||
aldona dobromiła emil emilian emiliusz maria marian
|
||||
maksymilian witold
|
||||
daniel edward mikołaj siemisław
|
||||
alan bernard dominik
|
||||
jadwiga teresa
|
||||
aurelia gerard grzegorz
|
||||
lucyna małgorzata marian wiktor
|
||||
julian łukasz
|
||||
ferdynand piotr siemowit skarbimir ziemowit
|
||||
irena urszula
|
||||
bernard celina dobromił elżbieta
|
||||
filip halka
|
||||
iga ignacy jan marlena roman seweryn teodor włościsław żegota
|
||||
antoni boleczest filip marcin rafaela rafał
|
||||
daria kryspin sambor taras
|
||||
dymitriusz łucjan lucyna ludmiła lutosław
|
||||
iwona sabina wincenty
|
||||
szymon tadeusz wszeciech
|
||||
euzebia franciszek lubogost teodor wioletta
|
||||
edmund klaudiusz przemysław sądosław
|
||||
antoni antonina godzimir lucylla łukasz dezemir
|
||||
andrzej seweryn warcisław wiktoryna
|
||||
bohdana bożydar małgorzata stojmir tobiasz
|
||||
bogumił cezary chwalisław hubert sylwia
|
||||
mściwój olgierd karol
|
||||
dalemir elżbieta florian sławomir
|
||||
feliks leonard trzebowit ziemowit
|
||||
antoni florentyn przemił
|
||||
dymitr klaudiusz seweryn wiktor
|
||||
bogudar genowefa teodor ursyn
|
||||
andrzej lena leon ludomir stefan
|
||||
anastazja bartłomiej maciej marcin spycisław teodor
|
||||
cibor czcibor jonasz krystyn marcin renata witold
|
||||
arkadiusz eugeniusz jan mikołaj stanisław
|
||||
aga agata damian elżbieta emil emiliusz józef judyta ścibor ścibora wszerad
|
||||
albert alfons artur gurias idalia józef leopold leopoldyna przybygniew roger
|
||||
edmund marek maria niedamir otomar paweł piotr
|
||||
grzegorz
|
||||
aniela cieszymysł klaudyna roman tomasz
|
||||
elżbieta mironiega paweł seweryn
|
||||
edmund feliks sędzimir
|
||||
janusz konrad maria piotr regina rena twardosław wiesław
|
||||
cecylia marek wszemiła
|
||||
adela klemens przedwoj
|
||||
dobrosław emilia emma franciszek gerard jan pęcisław
|
||||
katarzyna tęgomir
|
||||
dobiemiest jan konrad lechosław lechosława leonard sylwester
|
||||
dominik maksymilian stojgniew walery
|
||||
gościrad grzegorz jakub lesław lesława zdzisław
|
||||
błażej bolemysł fryderyk przemysł
|
||||
andrzej justyna konstanty
|
||||
blanka długosz edmund iwa natalia sobiesława
|
||||
aurelia balbina bibiana budzisław budzisława ludwina paulina sulisław sylweriusz sylwery wiktoryn zbylut
|
||||
franciszek kasjan lucjusz unimir
|
||||
barbara hieronim krystian piotr
|
||||
gerald krystyna pęcisława
|
||||
emilian jarogniew mikołaj
|
||||
marcin ninomysł
|
||||
boguwola maria światozar
|
||||
joachim wielisława wiesław
|
||||
andrzej daniel judyta julia maria
|
||||
daniela julia stefan waldemar wojmir
|
||||
aleksander dagmara
|
||||
lucja łucja otylia
|
||||
alfred izydor sławobor
|
||||
celina iga ignacy krystiana nina wolimir żegota
|
||||
alina zdzisława
|
||||
florian jolanta żyrosław
|
||||
bogusław gracjan laurencja wszemir
|
||||
beniamin dariusz gabriela mścigniew tymoteusz
|
||||
bogumiła dominik
|
||||
tomasz tomisław
|
||||
beata drogomir franciszka zenon
|
||||
sławomir sławomira wiktoria
|
||||
adam adamina adela ewa ewelina grzegorz
|
||||
anastazja eugenia piotr
|
||||
szczepan wróciwoj
|
||||
cezary jan radomysł
|
||||
antoni dobrowiest emma
|
||||
domawit dominik gosław jonatan marcin tomasz
|
||||
dawid eugeniusz katarzyna uniedrog
|
||||
korneliusz melania sebastian sylwester tworzysław
|
|
@ -0,0 +1,21 @@
|
|||
#!/usr/bin/env perl
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use Test::More;
|
||||
use DDG::Test::Goodie;
|
||||
|
||||
zci answer_type => "name_days_w25";
|
||||
zci is_cached => 1;
|
||||
|
||||
ddg_goodie_test(
|
||||
[qw( DDG::Goodie::NameDays::W25 )],
|
||||
'name day mieszko' => test_zci(' 1 Jan'),
|
||||
'maria imieniny' => test_zci('23 Jan, 2 Feb, 11 Feb, 25 Mar, 14 Apr, 26 Apr, 28 Apr, 3 May, 24 May, 25 May, 29 May, 2 Jun, 13 Jun, 27 Jun, 2 Jul, 16 Jul, 17 Jul, 22 Jul, 29 Jul
|
||||
, 2 Aug, 4 Aug, 5 Aug, 15 Aug, 22 Aug, 26 Aug, 8 Sep, 12 Sep, 15 Sep, 24 Sep, 7 Oct, 11 Oct, 16 Nov, 21 Nov, 8 Dec, 10 Dec'),
|
||||
# Try to include some examples of queries on which it might
|
||||
# appear that your answer will trigger, but does not.
|
||||
'name day' => undef,
|
||||
);
|
||||
|
||||
done_testing;
|
Loading…
Reference in New Issue