erster Buchstabe groß

[Peter Stock]

Hallo,

ich suche nach einer Möglichkeit, immer den ersten Buchstaben jedes Wortes durch einen Großbuchstaben zu ersetzen. Habe dazu bisher leider nichts finden können.

$text = "BLA_BLA_BLA_BLA";
$text = lc($text);

ergibt zunächst "bla_bla_bla_bla", ok

versucht habe ich folgendes:

$text =~ s/([^a-z]?)([a-z]?)/$1...../;
              ^^^     ^^^    ^^   ^^
               a       b      c    d

a) NICHT-Buchstabe finden.
b) Buchstabe finden.
c) NICHT-Buchstabe einsetzen.
d) Buchstabe einsetzen (hier weiß ich auch nicht, welcher Schalter das groß macht)

Ich habe es auch nach dem Beispiel in SelfHtml mit Transliteration probiert, aber da kommt nur Müll raus.

Kann mir da jemand helfen?

Danke!

Peter