diff --git a/modules/util/Net/fanout.pm b/modules/util/Net/fanout.pm
index 36331eb2a40bfdc43e28be5982f5c6f14041e777..c48db61bdde22cf5aa3160d6b1b42f550abde94d 100644
--- a/modules/util/Net/fanout.pm
+++ b/modules/util/Net/fanout.pm
@@ -1,5 +1,19 @@
 #!/usr/bin/perl
 
+=head1 NAME
+
+  Net::fanout
+
+=head1 DESCRIPTION
+
+Connect to a fanout pub/sub server to receive and send messages
+
+=head1 SYNPSIS
+
+  my $fanout= Net::fanout->new( { PeerHost => 'ppt.example.org' });
+
+=cut
+
 use strict;
 
 package Net::fanout;
@@ -192,3 +206,10 @@ sub send
 
 1;
 
+__END__
+
+=head1 TODO
+
+* add main() so that the module can be called in standalone mode to provide a simple fanout client.
+
+