my $t = encode("Latin-1",$text);
print "neu: >$t<\n";