Hallo ! In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert. Ich würde wetten dass es eine Möglichkeit gibt, in jeder Datei eines Verzeichnisses ein Wort durch ein anderes zu ersetzen. Ich glaub, das war irgendwas mit perl -e oder so. Kennt jemand den Einzeiler ? --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Norman Reppingen wrote:
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert.
Ich würde wetten dass es eine Möglichkeit gibt, in jeder Datei eines Verzeichnisses ein Wort durch ein anderes zu ersetzen. Ich glaub, das war irgendwas mit perl -e oder so.
Kennt jemand den Einzeiler ?
perl -p -i.bak -e"s/ecUM/Chum/g;" -p in place edit -i backup copy in .bak -e command to execute ollte gehen. Gruss Klaus -- +---------------------------+---------------------------+ | Klaus P. Wirl | Email: kwirl@lucent.com | | Lucent Technologies | Phone: +49 911 526-3626 | | Thurn-und-Taxis Str. 10 | Mobile:+49 171 970 6639 | | 90411 Nürnberg, Germany | Fax: +49 911 526-4193 | +---------------------------+---------------------------+ --- My opinion is my opinion is my opinion --- --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Hi ! Klaus Wirl schrieb:
perl -p -i.bak -e"s/ecUM/Chum/g;"
-p in place edit -i backup copy in .bak -e command to execute
sollte gehen.
Das genau isser ! *froi* Gibts irgendwo ein Verzeichnis eleganter Perl-Einzeiler ? Best wishes, Norman --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Das genau isser ! *froi* Gibts irgendwo ein Verzeichnis eleganter Perl-Einzeiler ?
Michael Schilli har in folgendem IX Artikel ein paar auf Lager: http://www.heise.de/ix/artikel/1998/07/133/ Gruß Alex -- a.gross@graumueller.com - http://www.bnv.pegnitz.de/alexander.gross/ Windows 95 is not the answer, it's the question and the answer is NO. --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Klaus Wirl schrieb in 1,1K (37 Zeilen):
Norman Reppingen wrote:
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. ^^^^^^ "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun,
perl -p -i.bak -e"s/ecUM/Chum/g;"
Denke daran, cat -> dog ergibt aus catastrophic dogastrophic. Also sollte es s/\becUM\b/Chum/g sein. \b == begin/end of word (zero length) "About the OpecUMMMmmm well, I dunno ..." "About the OpChumMMmmm well, I dunno ..." -Wolfgang --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Hi, On Tue, Dec 19 2000 at 13:33 +0100, Norman Reppingen wrote:
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert.
Ich würde wetten dass es eine Möglichkeit gibt, in jeder Datei eines Verzeichnisses ein Wort durch ein anderes zu ersetzen. Ich glaub, das war irgendwas mit perl -e oder so.
perl -pe 's/Chum/ecUM/og' -i~ * Ciao, Stefan --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Ciao, Von: chiron@rumms.uni-mannheim.de Gesendet: Dienstag, 19. Dezember 2000 13:34
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert.
Ich würde wetten dass es eine Möglichkeit gibt, in jeder Datei eines Verzeichnisses ein Wort durch ein anderes zu ersetzen. Ich glaub, das war irgendwas mit perl -e oder so.
Kennt jemand den Einzeiler ?
Ich kenn zwar kein perl aber ich glaube dieses shel skript loest dein Problem ebenfals. there: !#/bin/sh for VAL in `ls` do sed -e 's/<alter ausdruck>/<neuer ausdruck>/g' < $VAL > $VAL.$$ rm $VAL mv $VAL.$$ $VAL done Gruesse Martin -- Martin Wielander martin@wielander.net Open Minds. Open Sources. Open Future. --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
On 19 Dec 2000, at 12:57, Martin Wielander wrote:
Ciao,
Von: chiron@rumms.uni-mannheim.de Gesendet: Dienstag, 19. Dezember 2000 13:34
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert.
Ich würde wetten dass es eine Möglichkeit gibt, in jeder Datei eines Verzeichnisses ein Wort durch ein anderes zu ersetzen. Ich glaub, das war irgendwas mit perl -e oder so.
Kennt jemand den Einzeiler ?
Ich kenn zwar kein perl aber ich glaube dieses shel skript loest dein Problem ebenfals.
perl --help gibt Dir alles was Du brauchst! perl -n -i -e '...' alle_deine_files (ohne backup) perl -n -ibak -e '...' alle_deine_files (mit backup) Andreas PS: falls es zu viele Files sind, besser: for file in pattern do perl... done --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Am Dienstag, 19. Dezember 2000 13:33 schrieb Norman Reppingen:
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert.
Hm, ich musste gerade am Wochenende ein paar Umlaute in HTML- Dateien (alle Dateien in ihrem Verzeichnis) durch Ihre HTML-Variante ersetzt, perl hats dazu nicht gebraucht: --------------------------- schnipp ---------------------------- #!/bin/sh # Ersetzt in einem Verzeichnis bei allen Dateien # die Umlaute durch ihre HTML-Equivalente # Als übergabeparameter muss das Verzeichnis ange- # geben werden. for i in `find $1 -type f` do mv $i $i.save cat $i.save | sed -e "s/ä/\ä/g" \ -e "s/Ä/\Ä/g" \ -e "s/ü/\ü/g" \ -e "s/Ü/\Ü/g" \ -e "s/ö/\ö/g" \ -e "s/Ö/\Ö/g" \ -e "s/ß/\ß/g" \ > $i rm $i.save done exit 0 --------------------------- schnapp ---------------------------- Ich hoffe den Profis wird nicht übel, war das erste mal, dass ich mit sed gearbeitet habe, aber ca. 100 Dateien im Texteditor .... -- Machs gut | http://www.iiv.de/schwinde/buerger/tremmel/ | http://www.knightsoft.de Manfred | http://www.knightsoft-net.de --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
On Tue, 19 Dec 2000, Manfred Tremmel wrote:
Am Dienstag, 19. Dezember 2000 13:33 schrieb Norman Reppingen:
In einer neuen Seitensammlung der Uni-MAnnheim-HP soll ein Wort kollektiv durch ein Anderes ersetzt werden. "ecUM" soll "Chum" ersetzen, die Sache liegt auf einer Sun, Perl ist natürlich installiert.
Hm, ich musste gerade am Wochenende ein paar Umlaute in HTML- Dateien (alle Dateien in ihrem Verzeichnis) durch Ihre HTML-Variante ersetzt, perl hats dazu nicht gebraucht:
Mit Perl ist das auch irgendwie möglich (Ich denke an eine Hash-Table). Kurz zusammengefasst geht das ungefähr so wie du unten geschrieben hast: $ perl -p -i -e 's/Ä/\Ä/g' <Datei> So geht das obere auch: $ perl -p -i -e 's/ecUM/Chum/g' <Datei> Das geht sogar in eine Zeile... ;-) Achtung! Groß-, und Kleinschreibung wird beachtet.
Manfred | http://www.knightsoft-net.de
Mit freundlichen Grüßen, with best regards Simon Stiefel -- |Simon Stiefel | Zwerbachstrasse 17 | 72555 Metzingen-Glems | Germany | |SimonStiefel@wastie.de | http://www.wastie.de | ICQ-UIN: 20196644 | |phone: +497123/379070 | fax: +49179/335990106 | cell: +49179/5990106 | |Tux#: 114751 | PingoS - Linux-User helfen Schulen | Powered by LiNUX | --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Hallo, On Die, 19 Dez 2000, Manfred Tremmel wrote:
Am Dienstag, 19. Dezember 2000 13:33 schrieb Norman Reppingen: Hm, ich musste gerade am Wochenende ein paar Umlaute in HTML- Dateien (alle Dateien in ihrem Verzeichnis) durch Ihre HTML-Variante ersetzt, perl hats dazu nicht gebraucht: [..] cat $i.save | sed -e "s/ä/\ä/g" \ [..]
Fuer _diesen_ Fall kann man auch recode verwenden (siehe info recode): recode [-d] l[atin]1..h3 < input.datei > output.datei das konvertiert auch alle anderen non-ascii Zeichen ;) (mit -d alle ausser <>"& falls die Quelle schon html-tags enthaelt.) CU David -- Meine alte Provider email (dhaller@okay.net) wird demnaechst deaktiviert! Bitte ggfs. auf 'david@dhaller.de' umstellen... --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
Hallo, On Thu, 21 Dec 2000 at 0:07 +0100, David Haller wrote:
On Die, 19 Dez 2000, Manfred Tremmel wrote:
Am Dienstag, 19. Dezember 2000 13:33 schrieb Norman Reppingen: Hm, ich musste gerade am Wochenende ein paar Umlaute in HTML- Dateien (alle Dateien in ihrem Verzeichnis) durch Ihre HTML-Variante ersetzt, perl hats dazu nicht gebraucht: [..] cat $i.save | sed -e "s/ä/\ä/g" \ [..]
Fuer _diesen_ Fall kann man auch recode verwenden (siehe info recode):
recode [-d] l[atin]1..h3 < input.datei > output.datei
Das kannte ich.
das konvertiert auch alle anderen non-ascii Zeichen ;) (mit -d alle ausser <>"& falls die Quelle schon html-tags enthaelt.)
Und das nicht. Das war nämlich ein "Hindernis" *g* Wieder was gelernt. Gruß, Bernhard -- (o_ LINUX - WeilŽs Betriebssystem eben ned wurscht is (/)(o_ _o)_0) Infos zu dieser Mailingliste (als Ergänzung zur FAQ): //\ (\)/\\ http://home.t-online.de/~f.walle/ V_/_ _\_V HP: http://www.linuxinfopage.de * Tux# 171705 * ICQ# 98361051 --------------------------------------------------------------------- To unsubscribe, e-mail: suse-linux-unsubscribe@suse.com For additional commands, e-mail: suse-linux-help@suse.com
participants (11)
-
a.gross＠graumueller.com -
Andreas.Kyek＠d2mannesmann.de -
Bernhard.Walle＠gmx.de -
david＠dhaller.de -
eppingen＠rumms.uni-mannheim.de -
kwirl＠lucent.com -
Manfred.Tremmel＠iiv.de -
martin＠wielander.net -
SiStie＠wastie.de -
stefan＠troeger.st -
weissel＠netcologne.de