X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/8b05556284ebbd6f2af9c9168b3ff3f3c69615d2..e707c2080400363cd38ac94272146f2c7769f458:/word.plp diff --git a/word.plp b/word.plp index 050ad90..d1c0241 100644 --- a/word.plp +++ b/word.plp @@ -1,6 +1,16 @@ <(common.inc.plp)><: -my $wordlist = "data/wordlist.en.inc.pl"; +if ($Request and $Request =~ m{\A([^/]+)}) { + my $page = "word/$1.plp"; + utf8::downgrade($page); # unicode filename breaks contents encoding + if (-e $page) { + Include $page; + exit; + } +} + +my $lang = $get{lang} || 'en'; +my $wordlist = "data/wordlist.$lang.inc.pl"; my $limit = $get{v} // (exists $get{v} ? 4 : 3); Html({