Ruth: Ausgabe einzelner Woerter aua Text

Beitrag lesen

Habe folgendes Problem:
Ich lese einen Text ein und schneide danach die Endungen einiger Wörter ab (Stemming).

Text einlesen:
...........

Endungen abschneiden:
@result = ($text =~ s/en//gi);
@result = ($text =~ s/er//gi);
................

Resultat ausgeben (ganzer Text ohne die Endungen):
print "@result n";

Wie bekomme ich jetzt nur die Wörter allein heraus, die ich abgeschnitten habe?
print "$text n"; --> gibt ja nur die Anzahl abgeschnittener Wörter zurück.
Wie also?
Kann mir jemand helfen?