Agent::Loop - a basic, recursive sample agent.
use Agent;
my $agent = new Agent( Name => 'Loop', %args ); $agent->run;
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.
Host => TCP address of other Loop agent verbose => on/off
Agent, Agent::Message, Agent::Transport.
Steve Purkis <spurkis@engsoc.carleton.ca>
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.
