String in Variable bearbeiten

[gary]

Morgen zusammen,

Ich bin auf der Suche nach einer Methode, einen String, der in einer Variable sitzt, zu bearbeiten. Ich habe da schon was gefunden und wollte zwischenfragen, ob es eventuell dafür noch eine elegantere Möglichkeit gibt:

Beispielvariable: $Thema

Variable-Inhalt:  rauchen.txt

Transformation:   rauchen

Ziel:             Neue Variable mit der bearbeiteten Zeichenkette ($Display)

---> Also die letzten vier Zeichen entfernen.

Meine Lösung würde so aussehen:
----------------------------------------
my $Display;
$Display = $Thema;

for (my $i = 1;$i <= 4;$i = $i + 1) {
chop ($Display);
}
----------------------------------------

Nachdem das hier vier mal durchgelaufen ist, wurde ".txt" hoffentlich erfolgreich entfernt.

Oder führt noch ein anderer Weg nach Rom?

Viele Grüsse gary