service('http://www.xmethods.net/sd/BabelFishService.wsdl'); my $nameis = $babelfish-> BabelFish('en_es','My name is Shane Caraveo.'); print $nameis; ]]>