Doing translation in an application is a tough task. \u00c2\u00a0I wrote the following perl script to help the process along a bit using google translates v2 api. \u00c2\u00a0This script was written in 10 minutes and isn’t perfect but it did my whole project so I decided top share it here for others that may need it.<\/p>\n
This perl script requires a few modules from CPAN<\/a> listed here<\/p>\n For this script to be useful for you, you need to have a google api v2 API key from google. The new v2 api requires you to pay for translations. \u00c2\u00a0The upside is, currently it doesn’t cost much. \u00c2\u00a0About $20USD for 2,000,000 characters. \u00c2\u00a0Using this script I was able to translate about 20k words in about 15min.<\/p>\n <\/p>\n To get started you must have a google account with translate api access. \u00c2\u00a0Go to the google api console<\/a>\u00c2\u00a0Click on service an activate\u00c2\u00a0Translate API<\/a>\u00c2\u00a0service. \u00c2\u00a0Next click on API Access and generate a Server API key and give it your static IP for it to lock access to. \u00c2\u00a0Once it generates an API key for you place that in the header of the following script in the $api_key var<\/p>\n use strict; use File::Slurp;<\/p>\n my $version = ‘0.1’; sub init(){ usage() if $opt{h}; sub usage(){ -f The po file you want to translate. init();<\/p>\n sub main(){<\/p>\n processFile($opt{f}); sub processFile(){ \tmy @poFile = read_file($file);<\/p>\n \tmy $i = 0; sub transLate(){ \tmy ($sLang, $targetLang, $translatedString);<\/p>\n \tif(!$opt{s}){ \tif(!$opt{l}){ \tmy $lwpcurl = LWP::Curl->new();<\/p>\n \tmy $args = ‘?key=’.$api_key.’&source=’.$sLang.’&target=’.$targetLang.’&q=’.uri_escape($string); \tmy $json_text = $json->allow_nonref->utf8->relaxed->escape_slash->loose->allow_singlequote->allow_barekey->decode($content);<\/p>\n \tforeach my $trans (@{$json_text->{data}->{translations}}){ \treturn($translatedString); If you run the script without any arguments it will give you the following usage<\/p>\n Automated tool to take a PO file and use google translate to translate each string in the file.<\/p>\n .\/googleTranslate.po.pl [-V] -f -f The po file you want to translate. Here is how I use the script to generate a spanish version of my gettext po file<\/p>\n .\/googleTranslate.po.pl -f default.po -l ‘es’ > es.po<\/p><\/blockquote>\n","protected":false},"excerpt":{"rendered":" Doing translation in an application is a tough task. \u00c2\u00a0I wrote the following perl script to help the process along a bit using google translates v2 api. \u00c2\u00a0This script was written in 10 minutes and isn’t perfect but it did my whole project so I decided top share it here for others that may need […]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[40],"tags":[59,57,58,60],"class_list":["post-3086","post","type-post","status-publish","format-standard","hentry","category-web-development","tag-gettext","tag-i18n","tag-po","tag-translation"],"_links":{"self":[{"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/posts\/3086","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/comments?post=3086"}],"version-history":[{"count":6,"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/posts\/3086\/revisions"}],"predecessor-version":[{"id":3092,"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/posts\/3086\/revisions\/3092"}],"wp:attachment":[{"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/media?parent=3086"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/categories?post=3086"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.analogrithems.com\/rant\/wp-json\/wp\/v2\/tags?post=3086"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}\n
\n[crayon lang=”perl”]
\n#!\/usr\/bin\/perl<\/p>\n
\nuse warnings;
\nuse LWP::Curl;
\nuse URI::Escape;
\nuse JSON -support_by_pp;<\/p>\n
\nmy %opt;
\nmy $api_key = ‘YOUR GOOGLE api v2 key here’;
\nmy $googleTransLateURL = ‘https:\/\/www.googleapis.com\/language\/translate\/v2’;<\/p>\n
\n use Getopt::Std;
\n my $opt_string = ‘hVl:s:f:o:’;
\n getopts( “$opt_string”, \\%opt ) or usage();
\n if($opt{V}){
\n print $version.”\\n”;
\n exit;
\n }<\/p>\n
\n usage() if !$opt{f};
\n main();
\n}<\/p>\n
\n print STDERR <<\"EOF\";\nAutomated tool to take a PO file and use google translate to translate each string in the file.\n\n$0 [-V] -f
\n-l\tThe language you want it translated to
\n-s\tSource Language of text, defaults to en
\n-h This Help screen
\n-V Version
\nEOF
\nexit;
\n}<\/p>\n
\n}<\/p>\n
\n\tmy $file = shift();<\/p>\n
\n\tforeach my $line (@poFile){
\n\t\tif($line =~ m\/^msgid “”$\/){
\n\t\t\tprint $i;
\n\t\t}elsif($line =~ m\/^msgid “(.*)”$\/){
\n\t\t\tmy $translateString = ‘msgstr “‘.transLate($1).'”‘.”\\n”;
\n\t\t$i++;
\n\t\t\tprint $line;
\n\t\t\tprint $translateString;
\n\t\t}elsif($line =~ m\/^msgstr\/){
\n\t\t\t#skipp empty string, get it from above
\n\t\t\tnext();
\n\t\t}else{
\n\t\t\t# normal line print it as usual
\n\t\t\tprint $line;
\n\t\t}
\n\t}
\n}<\/p>\n
\n\tmy $string = shift();<\/p>\n
\n\t\t$sLang = ‘en’
\n\t}else{
\n\t\t$sLang = $opt{s};
\n\t}<\/p>\n
\n\t\tprint “ERROR: No target language was specified.\\n”;
\n\t\tusage();
\n\t}else{
\n\t\t$targetLang = $opt{l};
\n\t}<\/p>\n
\n\t#for now we are testing our loop logic
\n\tmy $content = $lwpcurl->get($googleTransLateURL.$args);
\n\tmy $json = new JSON;<\/p>\n
\n\t\t#ok, get the translated string now
\n\t\t$translatedString = $trans->{translatedText};
\n\t}<\/p>\n
\n}
\n[\/crayon]
\n <\/p>\n
\n-l\tThe language you want it translated to
\n-s\tSource Language of text, defaults to en
\n-h This Help screen
\n-V Version\n<\/p><\/blockquote>\n