ich gebs auf... :(

[Struppi]

hallo,
naja
ich habs jetzt doch wieder so geschrieben

if (dbmopen(%logins,$loginlog,0666))
{
    flock(logins,2) if ($doflocks);
   ($agent_last,$count_last,$date_last) = split(/\*/,$logins{$username});

Ich bezweifle stark, dass du damit einen Lock ausführst.

mach mal: flock(logins,2) || die "kann Datei nicht flocken! $!";

und, nein, tie macht keinen flock.

Struppi.