alle wörter, die mit "t" beginnen finden ?

[supermario]

Grützi!

Wie kann ich aus einem Text alle Wörter finden, die mit "t" beginnen und diese dann Fettgeschrieben ausgeben ?
zb. aus diesem Text:

"dies ist ein test und wird ein test bleiben"

Habe bereits in Selfhtml nachgesehen, konnte aber nur dasselbe mit einem Array aber nicht mit einer Zeichenkette finden.

Danke schon eimal!

[Christian Kruse]

Hallo,

Wie kann ich aus einem Text alle Wörter finden, die mit "t" beginnen
und diese dann Fettgeschrieben ausgeben ?

Nun, die Frage ist, wie du ein Wort definierst. Generell wuerde
ich erstmal sagen, das folgende wuerde es tun:

my @words = $text =~ /\b([tT].+?)\b/g;

Das wuerde aber bei einem zusammengesetzten Wort nur einen Teilstring
liefern. Versuch es vielleicht lieber mal so:

my @words = $text =~ /\s([tT]\S+)/g;

Naehere Informationen zu Regular Expressions findest du in
perldoc perlre (http://www.perldoc.com/).

Gruesse,
 CK

[supermario]

Hallo CK!

Danke für die Hilfe.

Ich hab das jetzt mal mit dem von mit angegebenen Satz, den ich in $text gespeichert habe getestet.
Wie bekomme ich jetzt aber die Ausgabe der gefundenen Wörter ?

Danke für jede weitere Hilfe !

[Christian Kruse]

Hoi,

Ich hab das jetzt mal mit dem von mit angegebenen Satz, den ich in
$text gespeichert habe getestet.
Wie bekomme ich jetzt aber die Ausgabe der gefundenen Wörter ?

Wie gibst du normalerweise Arrays aus?

Gruesse,
 CK

[supermario]

habs mit $words[0] probiert, aber da kam nix.

[supermario]

sorry hab was übersehen.
ich habe nämlich ganz am anfang auch ein wort, das mit "t" beginnt gesetzt und es wird einfach ignoriert. warum?

was müsste ich denn dann genau machen damit die wörter wieder an der richtigen stelle fett gedruckt ausgegeben werden ?
(also <b>wort</b>)

Danke schon vielmals für jeden Tipp.

[Christian Kruse]

Hallo,

ich habe nämlich ganz am anfang auch ein wort, das mit "t" beginnt
gesetzt und es wird einfach ignoriert. warum?

Nun, weil am Anfang kein \s-Zeichen steht.

was müsste ich denn dann genau machen damit die wörter wieder an der
richtigen stelle fett gedruckt ausgegeben werden ?
(also <b>wort</b>)

Mit dem s///-Operator. Ein Beispiel waere

$text =~ s!(?:^|\s)(t\S+)!<b>$1</b>!g;

Gruesse,
 CK