Opened by ritzel at 2011-04-01 14:30
Hallo,
ich frage mich gerade wie ich mehrere Zeilen in einem Textfile automatisiert ersetzen kann?
Bsp: Textinhalt
Das wollte ich mit folgendem in etwa replacen lassen, was allerdings nicht funktioniert.
Oder liegt das Problem hier mehr im "richtigen" escapen, sprich ich muss statt '-' eben ein '\-' setzen, bzw. gleich '\\-', weil ich in s/// wieder ein '\' brauchen werde?? Um mir das rumprobieren zu sparen, wollte ich hier mal in die Runde fragen, wie man soetwas angeht?
Last edited: 2011-04-01 14:33:49 +0200 (CEST)
ich frage mich gerade wie ich mehrere Zeilen in einem Textfile automatisiert ersetzen kann?
Bsp: Textinhalt
Code: (dl
)
1
2
3
4
5
6
7
8
## ----------------------
## maa
## ----------------------
## muu
## ----------------------
## mee
## ----------------------
...
Das wollte ich mit folgendem in etwa replacen lassen, was allerdings nicht funktioniert.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
my $orig = "## ----------------------
## muu
## ----------------------"
my $replace = "## Fisch
## Fleisch"
while( <> ){
s/$orig/$replace/;
print;
}
Oder liegt das Problem hier mehr im "richtigen" escapen, sprich ich muss statt '-' eben ein '\-' setzen, bzw. gleich '\\-', weil ich in s/// wieder ein '\' brauchen werde?? Um mir das rumprobieren zu sparen, wollte ich hier mal in die Runde fragen, wie man soetwas angeht?
Last edited: 2011-04-01 14:33:49 +0200 (CEST)