On Tue, May 18, 2004 at 02:11:22PM -0400, Andy Ruse wrote:
> connect_handler function looks like this:
>
> sub connect_handler {
> my ($self, $transaction, $recipient) = @_;
> my $remote_ip = $self->qp->connection->remote_ip;
>
...snips...
> If I start up qpsmtpd, and a message comes in from 1.2.3.4, the
> $remote_ip variable will be set to 1.2.3.4, like it should.
> However, when a subsequent message comes in from 6.7.8.9, the
> $remote_ip variable will still be set to 1.2.3.4. Why is this happening?
Could it be related to this problem ?
http://perl.apache.org/docs/general/perl_reference/perl_reference.html#my___Scoped_Variable_in_Nested_Subroutines
I'm not sure if pperl does the same as mod_perl in surrounding your code
with a wrapper, but the symptoms are identical, as is the use of "my".
(Nick makes note to go and check his own modules for similar constructs)
Nick