[- use FROGS::DataBase; $db = DataBase->new(); -] [$ if exists $fdat{'lang'} $] [- $udat{-lang} = $fdat{'lang'}; $db->set_language($udat{-lang}); #set language in Database in PLAYER.LANGUAGE my $player = $udat{-id}; $db->update_hash('PLAYER',"PLAYER=$player",{'LANGUAGE' => $fdat{'lang'}}); $db->commit(); # redirect to original page $http_headers_out{'Location'} = $udat{-current}; -] [$ else $] [- $db->set_language($udat{-lang}); Execute("menu.epl"); -]
[+ $db->loc('LANG_WELCOME') +]:

[+ $db->loc('LANG_ENGLISH') +]

[+ $db->loc('LANG_GERMAN') +]

[$ endif $]