Letztes Zeichen aus String entfernen

[Matti Maekitalo]

use Mosche;

Um einen Hinweis auf die Lösung zu geben:

ich hab nen String und möchte davon einfach nur das letzt Zeichen entfernen, ich kenn mich mit Perl nicht perfekt aus, aber ich weiß dass man da sicher nicht nur so dumme Funktionen benutzten muss, da lässt sich doch sicherlich was mit ner regular expression drehen, oder ?!

$var =~ /blablupkeineahnung/

Die Regex-Lösung ist etwa derart:
$var =~ s/.$//;

Wesentlich schneller geht es aber mit chop
$var = chop $var;

und wenn du ein eventuelles Leerzeichen entfernen willst:
$var = chomp $var;

use Tschoe qw(Matti);