2011/1/27 Carlos Agustín L. Avila <[email protected]>: > El día 27 de enero de 2011 14:04, Alberto Luaces <[email protected]> escribió: >> Carlos Agustín L. Avila writes: >> >>> El día 27 de enero de 2011 10:46, Alberto Luaces <[email protected]> escribió: >>>> fernando sainz writes: >>>> >>>>> El día 27 de enero de 2011 17:32, Carlos Agustín L. Avila >>>>> <[email protected]> escribió: >>>>>> Hola a todos. >>>>>> Solicito de su valiosa ayuda con un script en Perl, el cual debe de >>>>>> cambiar la codificación latin1 a utf8 de n cantidad de archivos. >>>>>> >>>>>> opendir(DIR,"/home/becerro/NetBeansProjects/Prontuario/vigente"); >>>>>> my @files = readdir(DIR); >>>>>> closedir(DIR); >>>>>> foreach my $file(@files) { >>>>>> if (-T $file) { >>>>>> print $file."\n"; >>>>>> } >>>>>> } >>>>>> Al momento de ejecutarlo me puestra todos los archivos del directorio. >>>>>> Gracias. >>>>>> >>>>>> >>>>> >>>>> Creo que ya existen programas para eso, yo buscaría un poco... >>>>> (Salvo que sea un ejercicio de programación :-) ) >>>>> >>>> >>>> find /home/becerro/NetBeansProjects/Prontuario/vigente -type f -exec \ >>>> iconv {} -t utf-8 -o {}.convertido \; >> >> [...] >> >>> >>> Alberto gracias, si embargo cometi el error de no dar mas detalles >>> sobre mi problema. >>> Los archivos de texto ubicados en el diretorio vigentes necesito >>> moverlos al directorio vigentes.res, luego los archivos del directorio >>> vigentes.res necesito cambiarles la codificación y guardarlos en el >>> directorio vigentes. >>> En pocas palabras: Todos los archivos de texto que se encuentran en el >>> directorio vigentes tengo que cambiarles la codificación. >>> Esto es debido a que fueros creados en un Debian con codificación latin1 >> >> Pues tan fácil como borrar los antiguos, y renombrar los nuevos, y sin >> necesidad de «.res». ¿Que quieres una copia de seguridad? Pues la haces >> antes y así tienes los originales. >> >> -- >> Alberto >> >> >> -- >> To UNSUBSCRIBE, email to [email protected] >> with a subject of "unsubscribe". Trouble? Contact [email protected] >> Archive: http://lists.debian.org/[email protected] >> >> > > Ok, Alberto. > El detalle es que son casi 6000 archivos. No pasa nada por que sean tantos ficheros, el find te lo va a hacer por ti
Create un script que sea a_utf8 fichero que haga lo que tu quieras (copia de seguridad, conversión ... ) y luego ejecuta el find con -exec a_utf8 fichero \; Y en un ratito lo tendrás Saludos -- To UNSUBSCRIBE, email to [email protected] with a subject of "unsubscribe". Trouble? Contact [email protected] Archive: http://lists.debian.org/[email protected]
