NAME

SYNOPSIS

 use Agent::Transport;

 # for receiving messages:
 $tcp = new Agent::Transport(
        Medium => 'TCP',
        Address => '1.2.3.4:1234'
 );
 
 # for sending:
 use Agent::Message;
 
 $msg = new Agent::Message(
        Medium => 'TCP',
        Body => [ @body ],
        Address => '1.2.3.4:1234'
 );
 $msg->send;

DESCRIPTION

ADDRESS FORMAT

This package groks the following standard tcp/ip formats:

 aaa.bbb.ccc.ddd:port
 host.domain:port
    

CONSTRUCTOR

new( %args )

If the Cycle argument is passed and if new() cannot capture the port specified, it will cycle through port numbers until a free port is found. If "new" is not passed an Address at all, it assumes '127.0.0.1:24368', and sets Cycle to 1.

METHODS & SUBS

$self->accept( %args )

This method is analagous to the accept() function call and is introduced to allow agent programmers to make full use of bi-directional sockets. It simply opens an incoming connection and returns that object, thus allowing you to use a single connection for multiple messages (see "IO::Socket" for details). Unfortunately, you'll have to design your own protocol.

Passing a 'From' argument as a referenced scalar, causes accept() to put what it thinks the remote address is into this variable.

$self->alias()

Returns $self->address() only. It should really do hostname lookups.

$self->recv( %args )

Passing a 'From' argument as a referenced scalar, causes recv() to put what it thinks the remote address is into this variable. Otherwise, recv() functions as described in Agent::Transport.

send( %args )

If you pass send() a 'KeepAlive' argument containing a reference to a scalar, it will set this scalar to the remote socket filehandle. This is meant to be used in conjunction with accept(), and is useful if you would like to have an extended conversation with the remote host.

NOTES

SEE ALSO

AUTHOR

COPYRIGHT

THANKS