sub getLanguagesForTranslate { my ($self) = @_; my $token = $self->getAccessToken(); my $soap = SOAP::Simple->new('http://api.microsofttranslator.com/V2/Soap.svc'); my $answer = $soap->GetLanguagesForTranslate("appId" => ""); return $answer->result; }