NAME
Agent::Loop - a basic, recursive sample agent.
SYNOPSIS
use Agent;
my $agent = new Agent( Name => 'Loop', %args ); $agent->run;
DESCRIPTION
transmits messages back & forth to & from another loop agent.
The Loop agent repeatedly transmits messages back and forth with another Loop agent. It is designed to demonstrate Agent Perl's messaging system to agent developers.
PARAMETERS
Host => TCP address of other Loop agent verbose => on/off
SEE ALSO
Agent, Agent::Message, Agent::Transport.
AUTHOR
Steve Purkis <spurkis@engsoc.carleton.ca>
COPYRIGHT
Copyright (c) 1997, 1998 Steve Purkis. All rights reserved. This package is free software; you can redistribute it and/or modify it under the same terms as Perl itself.