LINUX.ORG.RU

История изменений

Исправление helios, (текущая версия) :

local $/;
open F, '+>./file.dat' or die $!;
binmode F;
my $data = <F>;
# do smth.
print F $data;
close F;

М.б. так?

P.S. Не смог до конца понять что требуется, ибо топик старт написан одним куском.

Исходная версия helios, :

local $/;
open F, '+>./file.dat' or die $!;
binmode F;
my $data = <F>;
# do smth.
print F $data;
close F;

Мб так?