Hallo zusammen,
wie schon im Titel beschrieben soll ich per Perl Script die Informationen aus unserer TK-Anlage entnehmen.
In Pearl bin ich total unerfahren, aber net in C/C++ .
Den Code hab ich mir irgendwie zusammen gewürfelt :suspekt:
Die TK-Anlage hat ein UNIX System und ich will die Daten per Win2000 Client entnehmen.
Wäre super wenn mir jemand helfen könnte.
THX schonma
wie schon im Titel beschrieben soll ich per Perl Script die Informationen aus unserer TK-Anlage entnehmen.
In Pearl bin ich total unerfahren, aber net in C/C++ .
Code:
use strict;
use warnings;
use IO::Socket;
my $socket = new IO::Socket::INET(LocalPort => 8080,
Listen => 5,
Reuse => 1,
Type => SOCK_STREAM);
my $Ordner = '/dev/ttyS0';
my $Server = 'server';
connect($socket,$Server);
opendir(DIR, $Ordner) or die $!;
print '$'
closedir DIR;Den Code hab ich mir irgendwie zusammen gewürfelt :suspekt:
Die TK-Anlage hat ein UNIX System und ich will die Daten per Win2000 Client entnehmen.
Wäre super wenn mir jemand helfen könnte.
THX schonma
