Windowsovsky $/ problem (asi)

[Martin Caslavsky]

Zdravim!

Mam tento skript
#!/usr/bin/perl

open OLD, "old.gif" or die "nejde otevrit old.gif: $!\n";
open NEW, "> new.gif" or die "nejde otevrit new.gif: $!\n";
undef $/;
$t = <OLD>;
print NEW $t;

close OLD;
close NEW;

a tento problem: podle mych predpokladu by se mel do promenne nacist obsah
souboru a pak ulozit do souboru noveho - teda vpodstate zkopirovat. Jenomze
muj Perl od ActiveStatu to neudela - nenacte soubor cely (vzdy jen par
prvnich desitek bajtu a u ruznych souboru je to ruzne cislo a u jednoho
souboru vzdycky to same). Tenhleten problem je jenom u binarnich souboru,
textovy jedou v pohode.

Martin Caslavsky