Das gleiche wie hier habe ich jetzt auch in Perl probiert. Das gleiche Problem. Hab gefunden, dass es in Perl das Modul Unicode::String gibt. Kann allerdings auch nicht sehen wie mir das weiterhelfen soll.
print "Und hier sind die letzten fuenf Zeichen der Kette:\n"; print substr( $string , -5 ); print "\n";
Bash:
$ ./versuch.pl Bitte Zeichekette eingeben: Hallo Wält! Folgende Zeichenkette wurde eingegeben: Hallo Wält! Sie hat 12 Zeichen! Und hier sind die letzten fuenf Zeichen der Kette: ält!