Hoi,
$text =~ s/\b([a-z])([a-z]+?)\b/uc($1).lc($2)/eg;
Hier fehlt noch ein 'i' als Modifier:
$text =~ s/\b([a-z])([a-z]+?)\b/uc($1).lc($2)/gei; #l
Gruesse,
CK
nicht angemeldet nicht angemeldetHoi,
$text =~ s/\b([a-z])([a-z]+?)\b/uc($1).lc($2)/eg;
Hier fehlt noch ein 'i' als Modifier:
$text =~ s/\b([a-z])([a-z]+?)\b/uc($1).lc($2)/gei; #l
Gruesse,
CK