PDA

Visualizza la versione completa : [PERL] Piccolo Script sostituzione caratteri


electrolite84
13-10-2011, 12:03
Ciao,
mi servirebbe un piccolo script Perl che dato un file, per esempio myfile.txt o myfile.csv , sostituisce tutti i caratteri che inserisco io nel codice con altri sempre decisi da me, per esempio sostituisce tutte le "" con "a" e tutte le "" con "e".
Sto cominciando adesso col perl e non ho trovato nulla... Help :)

Mich_
17-10-2011, 16:40
Perl supporta molto bene le Regular Expressions (RE).
Tra i manuali del Perl, vedi quelli che hanno la stringa RE nel titolo: c'e` il manuale per chi inizia, quello completo ed anche altri: c'e` scritto tutto, anche se a volte non e` facile capire, specie all'inizio.

Ad esempio:
my str="cio bllo";
str ~= s//e/g;
str ~= s//a/g;
print str+"\n";(spero di non aver inserito errori di sintassi: e` un po' che non uso Perl, e sono arrugginito)

Dark867
10-11-2011, 19:51
Non so quanti anni hai e da quanto tempo programmi ma io ti consiglierei di abbandonare lo studio di perl, linguaggio che sta diventando sempre pi obsoleto perch rognoso dalla nascita, e cercare altre alternative come python.
Un esempio di codice in python il seguente


import string

myStr = "cio mndo"
myStr = string.replace(myStr,"","a")
myStr = string.replace(myStr,"","o")
print myStr


come vedi semplice e intuitivo..

Loading