NET::DUMMYINETD(1)    User Contributed Perl Documentation   NET::DUMMYINETD(1)

       Net::DummyInetd - A dummy Inetd server

           use Net::DummyInetd;
           use Net::SMTP;

           $inetd = new Net::DummyInetd qw(/usr/lib/sendmail -ba -bs);

           $smtp  = Net::SMTP->new('localhost', Port => $inetd->port);

       Net::DummyInetd is just what it's name says, it is a dummy inetd
       server.  Creation of a Net::DummyInetd will cause a child process to be
       spawned off which will listen to a socket. When a connection arrives on
       this socket the specified command is fork'd and exec'd with STDIN and
       STDOUT file descriptors duplicated to the new socket.

       This package was added as an example of how to use Net::SMTP to connect
       to a sendmail process, which is not the default, via SIDIN and STDOUT.
       A Net::Inetd package will be avaliable in the next release of libnet

       new ( CMD )
           Creates a new object and spawns a child process which listens to a
           socket.  CMD is a list, which will be passed to exec when a new
           process needs to be created.

           Returns the port number on which the DummyInet object is listening

       Graham Barr <>

       $Revision: 1.2 $

       The VERSION is derived from the revision by changing each number after
       the first dot into a 2 digit number so

               Revision 1.8   => VERSION 1.08
               Revision 1.2.3 => VERSION 1.0203

       Copyright (c) 1995 Graham Barr. All rights reserved. This program is
       free software; you can redistribute it and/or modify it under the same
       terms as Perl itself.

3rd Berkeley Distribution    perl 5.003, patch 07           NET::DUMMYINETD(1)