diff options
author | lagunex <lagunex@1f5c12ca-751b-0410-a591-d2e778427230> | 2011-05-11 14:22:24 +0400 |
---|---|---|
committer | lagunex <lagunex@1f5c12ca-751b-0410-a591-d2e778427230> | 2011-05-11 14:22:24 +0400 |
commit | 3e69fc929a8ff874bc634dd1780bbd022620dcbb (patch) | |
tree | a91b7f0fd9dfaaac7c134d4b1d8938b0f5b7eafa | |
parent | a8adc0d6f719d4175d133ca9874de501df44013f (diff) |
The client.perl example now tests the report-all-factors option
git-svn-id: https://mosesdecoder.svn.sourceforge.net/svnroot/mosesdecoder/trunk@3957 1f5c12ca-751b-0410-a591-d2e778427230
-rwxr-xr-x | server/client.perl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/server/client.perl b/server/client.perl index 14b6a26b1..eca5e388f 100755 --- a/server/client.perl +++ b/server/client.perl @@ -1,7 +1,8 @@ #!/usr/bin/env perl # -# Sample client for mosesserver, illustrating allignment info +# Sample client for mosesserver, illustrating allignment info and +# report all factors # use Encode; @@ -16,7 +17,7 @@ $text = "il a souhaité que la présidence trace à nice le chemin pour l' aveni # Work-around for XMLRPC::Lite bug $encoded = SOAP::Data->type(string => Encode::encode("utf8",$text)); -my %param = ("text" => $encoded, "align" => "true"); +my %param = ("text" => $encoded, "align" => "true", "report-all-factors" => "true"); $result = $proxy->call("translate",\%param)->result; print $result->{'text'} . "\n"; if ($result->{'align'}) { |