note Khen1950fx <c> #!/usr/bin/perl -l use strict; use warnings; use Lingua::Translate; Lingua::Translate::config( ua => LWP::UserAgent->new() ); my $x18r = Lingua::Translate->new( src => "de", dest => "en") or die "No translation server available for de -> en"; my $englisch = "Zu verstehen Englisch, benutzen Sie dies."; print $x18r->translate($englisch); </c> 962828 962828