Hej alla ...

Jag ville att bearbeta innehållet i en fil, som i ändra dess innehåll. Vad är det bästa sättet att göra det på perl? I mer detalj jag hav att gå igenom innehållet i filen, matchar mönster n sedan ändra innehållet i samma fil beroende på matchande resultat. All hjälp är välkommen.

Tack n gäller
Garric

Hej,

Detta kan hjälpa dig.

Kod:

1. open the file with fopen.
2. Read the contents line by line.
3. match the string with your pattern and repace accordingly.
4. Write line in another file.
5. remove new file with previous one.

testfile.txt:

Om Apple
Apple är en frukt
Jag gillar Äppelsaft


Kod

öppen (INFILE ". / testfile.txt") | | die ( "Kan inte öppna testfile.txt");
öppen (OUTFILE ,">./ orange.txt ") | | die (" Kan inte öppna orange.txt ");
while ($ str \u003d <INFILE>)
(
$ str \u003d ~ s / Apple / Orange / g;
Skriv ut OUTFILE $ str;
)
nära (INFILE);
nära (OUTFILE);

Orange.txt


Om Orange
Orange är en frukt
Jag gillar Orange Juice