+our $lang = $get{lang} || 'en';
+our $wordlistbase = "data/wordlist";
+
+if ($Request and $Request =~ m{\A([^/]+)}) {
+ my $page = "word/$1.plp";
+ utf8::downgrade($page); # unicode filename breaks contents encoding
+ if (-e $page) {
+ $wordlistbase .= ".$lang";
+ Include $page;
+ exit;
+ }
+}
+
+my $limit = $get{v} // (exists $get{v} ? 5 : 3);