timeout() unter Windows..... ???
Flo
- perl
Hallo alle,
ich lese mit Perl eine RS232-Schnittstelle aus:
my $verbindung = open( PORT, "+>COM1" );
read(PORT, $daten, 12);
print "$daten";
Jetzt habe ich ein Problem!
Wenn das Gerät jetzt ausgeschaltet ist, dann bekomme ich nichts reingelesen und das Programm hängt sich auf! Jetzt würde ich gerne vor dem read-Befehl einen Timeout() setzen, der ca. 4sek. wartet und wenn nichts kommt diesen Code überspringt.
Gibt es denn sowas oder wie muss ich das machen?
Bin um jede Hilfe dankbar!
Schönen Tag
Florian
Hallo,
Gibt es denn sowas oder wie muss ich das machen?
Vielleicht wäre http://search.cpan.org/~bbirth/Win32-SerialPort-0.19/ interessant für Dich. Damit kannst Du recht flexibel und bequem mit den seriellen Schnittstellen kommunizieren.
(für Linux/POSIX gibts äquivalentes unter http://search.cpan.org/~cook/Device-SerialPort-1.002/)
Grüße
Klaus