URL: https://linuxfr.org/forums/programmation-perl/posts/localisation
Title: Localisation
Authors: Grégory SCHMITT
Date: 2004年08月13日T23:53:44+02:00
Tags: 
Score: 0
Bonjour, 
 
Voilà, je crée actuellement un logiciel en Perl (que je devrais bientôt rendre public) et j'ai envie de faire une traduction. 
 
C'est pour cela que j'en appelle à votre science et votre expérience. Si vous avez déjà fait ça, comment l'avez-vous fait ? 
 
Pour info, ce logiciel fait moins de 1500 lignes de code (~1200 sans les commentaires), ce dont je suis plutôt content car les logiciels du même genre font plutôt 3000 lignes avec des fonctionnalités en moins. Il n'y a pas beaucoup de texte à traduire. Tout est en UTF-8 (natif ou converti), donc de problème de i18n. 
 
Je pense faire quelque chose comme un tableau @translation, avec comme clé "french", "english"... du genre 
$translation[1]{"english"} = "File not found"; 
$translation[1]{"french"} = "Fichier non trouvé"; 
 
Un coup d'oeil sur CPAN m'a donné un lien vers un module Gettext, que je connais depuis le C. Mais je n'ai pas envie d'imposer un module supplémentaire à l'utilisateur et si c'est trop compliqué à utiliser, le jeu n'en vaudra pas la chandelle. 
 
Des idées ?
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="https://linuxfr.org/forums/programmation-perl/posts/localisation.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="https://linuxfr.org/forums/programmation-perl/posts/localisation.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>