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 available in the next release of
- new ( CMD )
Creates a new object and spawns a child process which listens to a socket.
CMDis a list, which will be passed to
execwhen a new process needs to be created.
Returns the port number on which the DummyInetd object is listening
Graham Barr <email@example.com>
Copyright (c) 1995-1997 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.