Newsgroups: fj.questions.unix
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!news.nc.u-tokyo.ac.jp!newssinet!news.ipc.chiba-u!news.tj.chiba-u!asada
From: Takuya ASADA <asada@icsd6.tj.chiba-u.ac.jp>
Subject: Re: [Q]how to socket?
Message-ID: <DE5z5p.8s2@ics.tj.chiba-u.ac.jp>
Originator: asada@plover
Sender: usenet@ics.tj.chiba-u.ac.jp
Nntp-Posting-Host: icsj6.tj.chiba-u.ac.jp
Organization: Chiba-University
References: <1995Aug28.104105.24580@syrinx.dq.isl.ntt.jp>
 <MOTO.95Aug30005431@knife.kado.iijnet.or.jp>
Date: Thu, 31 Aug 1995 07:22:36 GMT
Lines: 24
Xref: galaxy.trc.rwcp.or.jp fj.questions.unix:4867
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.questions.unix&nb=4867&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

> HTTP $B$H(B TELNET $B$G$O(B TCP $B%3%M%/%7%g%s3NN)8e$N<j=g$,0c$&$+$i$G$9!#(B

$B$G$9$M!#(B

> > if(socket(S,2,1,$proto)){}else{ die $!;}
> soket() $B$NJV$9CM$O(B BOOL $BCM$G$O$J$$$G$9$h$M!)(B

BOOL $BCM$@$C$?$H;W$&$G$9$1$I!D!#(B

$B$=$l$h$j$b!">r7o$,??$N$H$-$N%V%m%C%/$,6u$J$N$,!"%"%l$H$$$($P%"%l(B
$B$G$9$M!#%+!<%K%O%s@h@8$b$3$&$$$&$N$OHr$1$k$h$&$K$H=q$$$F$$$i$7$?(B
$B$N$G!"$3$3$O(B

unless(socket(S,2,1,$proto)){ die $!;}

$B$H$+(B

(socket(S,2,1,$proto)) || die $!;

$B$NJ}$,(B perl $B$C$]$$$7!"%-%b%A$$$$$+$b$7$l$s$G$9!JK\Bj$H4X78$J$$(B
$B%D%C%3%_$G$9$s$^$;$s!K!#(B

$B$"$5$@!!$?$/$d(B

