The CGI-Forum

Here you can read all entries on the board and/or make own entries. Have fun!
Perl: gerservbyport....bin ich zu bloed?? - Sascha Ottolski (sascha@ella.ww.tu-berlin.de), 26.8.97 - 15:36:56
Hi,
kann mir jemand nen Tip geben wie man getservbyport verwenden muss?
Folgendes Skript klappt nicht, auch mit pack() hab ichs nicht hinbekommen (vielleicht falsch angewendet...):
#!/usr/bin/perl -w
$port=23;
($eins,$zwei,$drei,$vier) = getservbyname($port,'tcp');
print '1: $eins\n2: $zwei\n3: $drei\n4: $vier\n';
Das Ergebnis:
[sascha@ella perl]$ ./testgetserv.pl
Use of uninitialized value at ./testgetserv.pl line 5.
Use of uninitialized value at ./testgetserv.pl line 5.
Use of uninitialized value at ./testgetserv.pl line 5.
Use of uninitialized value at ./testgetserv.pl line 5.
1:
2:
3:
4:
Vielen Dank schon jetzt fuer die Loesung...
Gruss Sascha


New MessageReply tn thisReply on topicDeleteOverviewPreviousNext Mail this Mail topic Mail all
New messageReply to this messageEntry to this topicDelete entryAll entries Previous Entry Next EntryMail this message Mail this topic Mail all messages

Script written by
Wolfgang Wiese, feedback welcome.