shared lock Frage (gelöst) - #181066 (Allgemeines zu Perl)

Kuerbis

2015-05-15 11:02

User since
2011-03-20
947 Artikel
BenutzerIn
[default_avatar]

Ist in diesem Fall das SEEK_END auch überflüssig?

Code (perl): (dl )

open my $fh, '>', $file or die $!;
flock $fh, LOCK_EX     or die $!;
seek  $fh, 0, SEEK_END or die $!;
print $fh $json;
close $fh;