Hinweis: Das Forum wird geschlossen! Neue Registrierungen sind nicht mehr möglich!

 Zurück zu Pro-Linux   Foren-Übersicht   FAQ     Suchen    Mitgliederliste
Lowercase in Perl

 
Neuen Beitrag schreiben   Auf Beitrag antworten    Pro-Linux Foren-Übersicht -> Programmieren - Allgemein
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
aebi



Anmeldungsdatum: 02.12.1999
Beiträge: 41
Wohnort: Kastanienbaum

BeitragVerfasst am: 07. Jan 2002 13:55   Titel: Lowercase in Perl

Hallo Zusammen

Ich einem meiner Perl-Programme will ich einen Dateinamen in Kleibuchstaben umwandeln. Dazu habe ich folgenden Code geschrieben:
my $newname=lc($_);
Der verichtet seinen Dienst auch FAST perfekt.
Wenn ich nun preSTAFÜ in $_ habe dann ist das Resultat prestafÜ (das ü wird nicht verkleinert). Ist das ein mein Fehler oder Perl's Fehler (oder Absicht)?

Merci
Philipp
 
Benutzer-Profile anzeigen Private Nachricht senden

trinity



Anmeldungsdatum: 12.10.2001
Beiträge: 821

BeitragVerfasst am: 09. Jan 2002 9:21   Titel: Re: Lowercase in Perl

IMHO konvertiert Perl nur 7Bit-ASCII Zeichen (was eigentlich ein normales verhalten wäre).
_________________
"Korrekt, Freundlich, Kostenfrei", wähle genau zwei. (Lutz Donnerhacke in dcsf)


Zuletzt bearbeitet von trinity am 09. Jan 2002 9:21, insgesamt 1-mal bearbeitet
 
Benutzer-Profile anzeigen Private Nachricht senden

aebi



Anmeldungsdatum: 02.12.1999
Beiträge: 41
Wohnort: Kastanienbaum

BeitragVerfasst am: 13. Jan 2002 16:42   Titel: Re: Lowercase in Perl

Wie kriege ich dann mein Ü klein?
Gibt es irgend einen andere Möglichkeit?

Philipp
 
Benutzer-Profile anzeigen Private Nachricht senden

Descartes
Gast





BeitragVerfasst am: 13. Jan 2002 20:18   Titel: Re: Lowercase in Perl

Wie wäre es wenn du eine eigene lowercase-Funktion schreibst, die auch noch ein tr/// auf den String anwendet ?

code:

#!/usr/bin/perl -w

use strict;
use warnings;

my $var = "ÜBERFALL";

$var =~ tr/[ÄÖÜ]/[äöü]/;

print lc($var) . "\n";

 

Descartes
Gast





BeitragVerfasst am: 13. Jan 2002 20:26   Titel: Re: Lowercase in Perl

code:

#!/usr/bin/perl -w

use strict;
use warnings;

sub myLower ($)
{
my $string = $_[0];
$string =~ tr/[ÄÖÜ]/[äöü]/;
return lc($string);
}

print myLower ("ÜBERFALL") ;

 

aebi



Anmeldungsdatum: 02.12.1999
Beiträge: 41
Wohnort: Kastanienbaum

BeitragVerfasst am: 14. Jan 2002 10:12   Titel: Re: Lowercase in Perl

Werde ich mir heute Abend mal anschauen

Danke viel mal
Philipp
 
Benutzer-Profile anzeigen Private Nachricht senden

Beiträge vom vorherigen Thema anzeigen:   
     Pro-Linux Foren-Übersicht -> Programmieren - Allgemein Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehen Sie zu:  

Powered by phpBB © phpBB Group
pro_linux Theme © 2004 by Mandaxy