From: JP v. M. <jp...@ds...> - 2008-01-29 11:10:19
|
I'm not a programmer anymore and never looked into modern languages like Perl or Python. A shame really. I can't implement it, but behind the else, the code should look for stmpDestinationRT and if it exists only bind to the interfaces that are listed there. A piece of cake for an experienced programmer. Someone else wants to contribute the code? if($interface) { $s = new IO::Socket::INET(Listen => 10, LocalPort => $p, Reuse=>1, LocalAddr => $interface); } else { if($smtpDestinationRT) { # some loop parsing smtpDestinationRT $s = new IO::Socket::INET(Listen => 10, LocalPort => $port, Reuse=>1, LocalAddr => $interface); } else { $s = new IO::Socket::INET(Listen => 10, LocalPort => $port, Reuse=>1); } } |