Anzahl der Matches eines RegExps ermitteln

[LanX]

Hallo Leute

Anfaengerfrage:
Ich will ausgeben wie oft ein Suchausdruck in einem String vorkommt,
hab bisher aber nichts eleganteres gefunden als erst alle Matches
einem Array zuzuweisen, die Laenge des Arrays zu ermitteln und dieses
dann auszugeben, dass muss doch auch eleganter gehen oder???

so gehts unelegant:
  @POSTINGS=/($POSTING_START)/gs;
  $ANZ_POSTINGS=@POSTINGS;
  print "$THEMA postings:$ANZ_POSTINGS\n";

waehrend das folgende nur 1 fuer "Suche erfolgreich" meldet
  $ANZ_POSTINGS=/($POSTING_START)/gs;

Danke im voraus fuer die Hilfe

Tschuess
Rolf