Lines Matching refs:port

93 	my $port = shift;
104 		PeerPort => $port) || do { alarm(0); die 'socket()'; };
131 	my $port = shift;
135 	while (0 == $self->listening_on($port)) {
159 	my($port) = sockaddr_in(getsockname($SOCK));
160 	return ($SOCK, $port);
167 	my $port;
168 	(undef, $port) = bind_ephemeral_tcp_socket();
169 	return $port;
467 	my ($self, $binary, $port) = @_;
478 		bind(SOCK, sockaddr_in($port, $iaddr)) || die "bind: $!";
484 		if (0 != $self->wait_for_port_with_proc($port, $child)) {
485 			diag(sprintf("\nThe process %i is not up (port %i, %s)", $child, $port, $binary));