undefined < 0 möglich

[romy]

Hi Siechfried,

Dann poste doch mal die Fehlermeldungen (in perldiag bist du nicht fündig geworden?).

doch, jetzt schon, er sagt, dasselbe, was Du schon sagtest, nämlich, dass dies eine Warnung ist und kein Fehler.

der Fehler im Log lautet:

uninitialized value at Blubberkram Line 51,52,53 in einer Endlosschleife. immer wieder dieser Fehler, abwechselnd in 51,52,53, was logisch ist.

Blubberkram:
while($sent > 0) {
   my $n = syswrite($data, $buf, $sent,$off);
51   return $n if $n < 0;
52   $sent -= $n;
53   $off += $n;
 }

deswegen meine Vermutung, n ist uninitialisiert, wenn undefined vom Syswrite weitergegeben wird, weil es fehlschlägt.
Dieser Auszug stammt aus einer Lib, die wie gesagt sehr alt ist.
ich kann leider kaum Angaben dazu machen, da ich nur versuche, jemanden zu helfen, ich kenne weder die Scripte noch Perl an sich etc.
ich versuche nur gerade die Ursachen etwas einzuschränken.

danke

ciao
romy