Ciao a tutti ...

Volevo processo il contenuto di un file, come nel modificare il suo contenuto. whats il modo migliore per farlo su perl? Più in dettaglio I hav a passare attraverso il contenuto del file, far corrispondere i modelli n quindi modificare il contenuto dello stesso file a seconda dei risultati corrispondenti. Qualsiasi aiuto è benvenuto.

Grazie n riguarda,
Garric

Salve,

Questo può aiutarvi.

Codice:

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:

A proposito di Apple
Apple è un frutto
Mi piace il succo di mela


Codice

aperto (infile, ". / testfile.txt") | | die ( "Impossibile aprire testfile.txt");
aperto (OUTFILE ,">./ orange.txt ") | | die (" Impossibile aprire orange.txt ");
while ($ str \u003d <INFILE>)
(
$ str \u003d ~ s / Apple / Orange / g;
stampa OUTFILE $ str;
)
close (infile);
close (OUTFILE);

Orange.txt


A proposito di Orange
Orange è un frutto
Mi piace Orange Juice