Opened by Medusalem at 2005-03-29 19:13
User since
2005-03-29
2 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-03-29
2 Artikel
BenutzerIn
Hallo Zusammen,
bin Praktikant und soll mir Perl beibringen, nun bin ich an was hängen geblieben:
Ich will eine Datei ändern und zwar das es falsche Sonderzeichen in die richtigen umändert. Also z.B. "%&¼" in "ü".
Habs schon prima hinbekommen das er mir Zeichenersetzung macht also alle "a" in ein "Ä" umwandelt (war nur test!).
Nun will ich Textersetzung machen. Jetzt ersetzt er mir aber immer nur das erste "%&¼" in ein ü und dann is schluss, paralell macht er aber die Zeichenersetzung richtig.
Hier ist mein Programm mal soweit, ich hoffe die Frage is net all zu blöd nur hab ich nirgends drüber was gefunden :).Bin für jede Hilfe Dankbar.
Seh grad das des net so ganz richtig rauskommt :)
Das hinter dem % (&¼)ist ein "ein-viertel" Zeichen....[B]
edit: Code Tags\n\n
<!--EDIT|[E|B]|1112115401-->
bin Praktikant und soll mir Perl beibringen, nun bin ich an was hängen geblieben:
Ich will eine Datei ändern und zwar das es falsche Sonderzeichen in die richtigen umändert. Also z.B. "%&¼" in "ü".
Habs schon prima hinbekommen das er mir Zeichenersetzung macht also alle "a" in ein "Ä" umwandelt (war nur test!).
Nun will ich Textersetzung machen. Jetzt ersetzt er mir aber immer nur das erste "%&¼" in ein ü und dann is schluss, paralell macht er aber die Zeichenersetzung richtig.
Hier ist mein Programm mal soweit, ich hoffe die Frage is net all zu blöd nur hab ich nirgends drüber was gefunden :).Bin für jede Hilfe Dankbar.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!/usr/bin/perl
#Umlaute ändern
#print "Dateiname komplett eingeben: ";
$datei = <Fehlerdatei.txt>;
open(LESEN, "<$datei");
@inhalt = <LESEN>;
$zeile = join('',@inhalt);
close (LESEN);
$zeile =~ s/%&¼/ü/;
$zeile =~ tr/a/Ä/;
open (SCHREIBEN, ">$datei");
print SCHREIBEN $zeile;
close (SCHREIBEN);
Seh grad das des net so ganz richtig rauskommt :)
Das hinter dem % (&¼)ist ein "ein-viertel" Zeichen....[B]
edit: Code Tags\n\n
<!--EDIT|[E|B]|1112115401-->