nebenbei: wenn in $wort irgendwelche "komischen" zeichen wie . ( * + vorkommen, werden die als regexp-sonderzeichen behandelt, und es koennen deshalb sogar runtime-error auftreten, die das programm abstuerzen lassen. um da sicher zu gehen, besser die Variable zusaetzlich mit \b\Q$word\E\b quoten, dann kann da nichts passieren.\n\n

<!--EDIT|Strat|1127397082-->