Re: OT.- Perl conversión de archivos.
El día 27 de enero de 2011 14:04, Alberto Luaces <aluaces@udc.es> escribió:
> Carlos Agustín L. Avila writes:
>
>> El día 27 de enero de 2011 10:46, Alberto Luaces <aluaces@udc.es> escribió:
>>> fernando sainz writes:
>>>
>>>> El día 27 de enero de 2011 17:32, Carlos Agustín L. Avila
>>>> <cagustinla@gmail.com> 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 debian-user-spanish-REQUEST@lists.debian.org
> with a subject of "unsubscribe". Trouble? Contact listmaster@lists.debian.org
> Archive: [🔎] 87bp32yuy8.fsf@eps142.cdf.udc.es">http://lists.debian.org/[🔎] 87bp32yuy8.fsf@eps142.cdf.udc.es
>
>
Ok, Alberto.
El detalle es que son casi 6000 archivos.
Reply to: