LWP::Socket - TCP/IP socket interface
$socket = new LWP::Socket; $socket->connect('localhost', 7); # echo $quote = 'I dunno, I dream in Perl sometimes...'; $socket->write("$quote\n"); $socket->read_until("\n", \$buffer); $socket->read(\$buffer); $socket = undef; # close
Beware: New code should not use this module. The IO::Socket::INET module provide the standard Perl interface to OO Internet sockets. Even LWP is now rewritten to use IO::Socket::INET throughout.
This class implements TCP/IP sockets. It groups socket generation, TCP address manipulation and buffered reading. Errors are handled by dying (throws exceptions).
Running this module standalone executes a self test which requires localhost to serve chargen and echo protocols.
The following methods are available:
- $sock = new LWP::Socket()
Constructs a new socket object.
- $sock->connect($host, $port)
Connect the socket to given host and port.
Shuts down the connection.
- $sock->bind($host, $port)
Binds a name to the socket.
Set up listen queue for socket.
Accepts a new connection. Returns a new LWP::Socket object if successful. Timeout not implemented yet.
Returns a 2 element array ($host, $port)
- $sock->read_until($delim, $data_ref, $size, $timeout)
Reads data from the socket, up to a delimiter specified by a regular expression. If $delim is undefined all data is read. If $size is defined, data will be read internally in chunks of $size bytes. This does not mean that we will return the data when size bytes are read.
Note that $delim is discarded from the data returned.
- $sock->read($bufref, [$size, $timeout])
Reads data of the socket. Not more than $size bytes. Might return less if the data is available. Dies on timeout.
Put data back into the socket. Data will returned next time you read(). Can be used if you find out that you have read too much.
- $sock->write($data, [$timeout])
Write data to socket. The $data argument might be a scalar or code.
If data is a reference to a subroutine, then we will call this routine to obtain the data to be written. The routine will be called until it returns undef or empty data. Data might be returned from the callback as a scalar or as a reference to a scalar.
Write returns the number of bytes written to the socket.
- $sock->_getaddress($h, $p)
Given a host and a port, it will return the address (sockaddr_in) suitable as the
nameargument for connect() or bind(). Might return several addresses in array context if the hostname is bound to several IP addresses.
This self test is only executed when this file is run standalone. It tests its functions against some standard TCP services implemented by inetd. If you do not have them around the tests will fail.