Re: Convertir texto en ASCII llano

[Pedro Burgos]

On Fri, 7 Nov 2003 12:10:25 +0100
^pi^ <[EMAIL PROTECTED]> wrote:

> hab�a (creo) una aplicacion/script para quitar los dichosos ^M que se
> crean en un texto plano (creo que al pasa por win pero no lo tengo
> claro).

#!/usr/bin/perl
# convert a dos \r\n format to unix \bn
open(FILE, $ARGV[0]);
while(<FILE>) {
        # remove the stupid \r, replace with \n
        # some broken editors just put \r
        s/\r/\n/g;
        # Remove the duplicate \n
        s/\n\n/\n/g;
        print;
}
close(FILE);