hi,
Danke, dann mach ich mal weiter...
Klar, mach ;-)
Schau dir mal die komfortablere Alternative zu open() an, die heißt sysopen(). Fcntl dann wie folgt:
use Fcntl qw(:DEFAULT :flock);
und Du kannst Modi setzen, z.B.
sysopen(my $fh, $file, O_RDWR|O_CREAT) or return;
Buchtipp: Perl kurz & gut, Johan Vromans (O'Reilly) das ist ein Taschenbuch, was ich schon zweimal gekauft habe, weil das wirklich hilft (und weils mir einmal geklaut wurde).
Viele Grüße,
Horst Hauser
--
Ein Esel, der sich nicht entscheiden kann, verhungert zwischen zwei Heuhaufen.
Ein Esel, der sich nicht entscheiden kann, verhungert zwischen zwei Heuhaufen.