perlスクリプトを国際化ã—ãŸã„ã¨æ€ã£ãŸã®ã§è©¦ã—ã¦ã¿ãŸ - id:lopnor#!/usr/bin/perl use strict; use warnings; use FindBin; use Locale::Maketext::Simple Style => 'gettext', Path => $FindBin::Bin; warn loc('hello'); ã“ã®ã¾ã¾å®Ÿè¡Œã™ã‚‹ã¨ã€ [danjou@guido] $ perl test.pl hello at test.pl line 7.ã“ã†ãªã‚‹ã€‚ ã“ã“ã§ã€xgettext.plを実行ã—ã¦å›½éš›åŒ–ã®ãŸã‚ã®ãƒ•ã‚¡ã‚¤ãƒ«ã‚’ã¤ãる。（Locale::Maketext::Lexiconを入れるã¨ä¸€ç·’ã«/usr/bin/xgettext.plãŒã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã‚‹ã€‚）-dオプションã§jaを指定ã—ã¦æ—¥æœ¬èªžç”¨ã®ãƒ•ã‚¡ã‚¤ãƒ«ã‚’ã¤ãる。 [danjou@guido] $ xgettext.pl -d ja test.pl [danjou@
{{#tags}}- {{label}}
{{/tags}}