gudn tach!
hmpf, hab's versehentlich abgeschickt, statt erst noch mal die vorschau zu sehen...
in der zeile
if(substr($str, $str_cursor-1, 2)=~/[a-z]{2}/){
muesste es heissen /[a-z]{2}/i
damit auch grossbuchstaben keine probleme machen.
sonderzeichen wie umlaute und das eszett sind bisher noch gar nicht beruecksichtigt.
naja, aber das wirst du ja sicher entsprechend an deiner anforderungen anpassen koennen.
prost
seth