Re: Socket.pm für Windows 2000

[Edmund Wollgarten]

Hallo Herr Berger,

> Win 2000 nicht funktioniert. Plausibler aber
> ist, dass Ihre Socket-Aufrufe evtl. etwas verwegen
> sind (viele Beispiele waren sehr alt und sehr
> vodoo, hatten aber grossen Einfluss auf spaetere
> Programme) und besser umformuliert werden sollte.
> 
unser Socket-Aufruf sieht so aus:

$port='4949';
$iaddr = inet_aton($remote) or die "no host: $remote"; 
$paddr = sockaddr_in($port,$iaddr);
$proto = getprotobyname('tcp');
socket(S, PF_INET, SOCK_STREAM, $proto) || die "socket: $!";
connect(S, $paddr)  or die "connect: $!";
select(S); $| = 1; select(stdout);

Das Auslesen des Sockets erfolgt so:

while(<S>)
  {
  if (/AVANTI:EOR/) { last; }
  ...
   }
> Welche Version haben Sie und welche Fehlermeldung
> bekommen Sie mit welchem Skript?

Wir haben die Perl-Version 5.6. Mit  unserem Perl-Skript erhalten wir 
bei avanti-Jobs manchmal (nicht immer!) das Ergebnis, dass der 
avanti-Job mit als Ergebnis angezeigt wird, also so, als ob der Befehl 
AVANTI:EOJ nicht oder nicht richtig interpretiert würde.

Beispiel:
get i42 #uab 000-0 at y9900838 #ubc nein #ucd nein xport param opac
download @ DB=000 ID=opac/OPA 

Mit freundlichen Grüßen

Edmund Wollgarten
Bibliothek der RWTH Aachen
Templergraben 61
52062 Aachen
Tel. 0241/80-4450
Fax. 0241/8888273
E-Mail wollgart at bth.rwth-aachen.de