use bablefish;

my $client = WebService::BabelFish->new;

my $response = $client->

BabelFish('en_es','Open Source is cool.');

print $ response->result."\n";