Strings in Perl auf Kleinschreibung setzen

Hi!

Wie kann ich Strings in Perl, bei denen nicht klar ist, ob sie in Groß- oder Kleinbuchstaben geschrieben sind (oder gemischt)auf Kleinschreibung setzen?

Ciao
Michael

$string =~ tr/A-Z/a-z/;

glaub ich

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo Michael,

Wie kann ich Strings in Perl, bei denen nicht klar ist, ob sie
in Groß- oder Kleinbuchstaben geschrieben sind (oder
gemischt)auf Kleinschreibung setzen?

#!/usr/bin/perl
$wort="gEmISCht";
print "Aus $wort mach kleines Wort:",lc($wort),"\n";

Achtung mit Umlauten, dazu muss ein Locale-System installiert sein und der folgende Aufruf sollte ein „define“ bringen:

[os]$ perl -V:d_setlocale
d_setlocale=‚define‘;

Siehe auch „perldoc -m POSIX“, Stichwort „setlocale“.

Gruss,

-Andreas.