If you want to do this from Windows (rather than Unix), it seems to be very hard to stop perl wanting to convert anything that looks like ascii 10 back to ascii 10 + ascii 13.

The one way I've managed to do it is to put the file handle into binmode. aka:

binmode STDOUT;
while (<>) {
    s/\n//;
    print "$_" . chr(10);
}
[download]

Possibly there is a variable that controls this but I haven't found it and things like $OFS in the program and -l012 on the command line don't seem to help (in perl 5.16). Possibly someone might to look into this in more detail.