Toto: regex Frage zu Groß/Kleinschreibung

Beitrag lesen

Kann mir bitte jemand helfen, wie ich alle Großbuchstaben *AB DEM 2. BUCHSTABEN* durch Kleinbuchstaben ersetzen kann?

Ich kann zwar kein Perl, aber für Fußgänger:

$ende = alles_nach_dem_ersten_buchstaben_kopieren($wort)
$kleinesende = lc $ende

$ersterbuchstabe = ersten_buchstaben_kopieren($wort)

$wort = ersterbuchstabe + $kleinesende

(Geht natürlich auch in einer einzigen Zeile.)

Google ist zwar meistens mein Freund, aber diesmal hat er keine Lösung für mich ausgespuckt :(

Vielleicht beim Programmieren gelegentlich mal selber denken?