Subject: Comment doesn't match code in perlipc.pod.
Date: Thu, 30 Jul 2009 07:31:48 -0600
To: perlbug@perl.org
From: David Fifield <david@bamsoftware.com>
my $hisiaddr = inet_aton($host) || die "unknown host";
my $hispaddr = sockaddr_in($port, $hisiaddr);
socket(SOCKET, PF_INET, SOCK_STREAM, $proto) || die "socket: $!";
- connect(SOCKET, $hispaddr) || die "bind: $!";
+ connect(SOCKET, $hispaddr) || die "connect: $!";
my $rtime = ' ';
read(SOCKET, $rtime, 4);
close(SOCKET);