my $string ="EICHENBAUMSCHULE";
my @query = qw(EIC BAUM UMS CHU LE);