perl code um text files unix2dos konvertieren - #83609 (Allgemeines zu Perl)

steffenw

2004-06-20 16:23

User since
2003-08-15
692 Artikel
BenutzerIn

"\n" ist uneindeutig, also systemabhängig. Besser ist:

Code: (dl )

1
2

s/\x0D//g;
s/\x0A/\x0D\x0A/g;

Und dann hast Du sicher noch das Umlautproblem. cp850 ist die Codepage von DOS.

Wenn Du zum Filehandle schreibst, was das DOS-File wird, füge nach dem Open folgendes ein:

Code: (dl )

binmode FILEHANDLE, 'encoding(cp850)' or die $!;

\n\n

$SIG{USER} = sub {love 'Perl' or die};