Tom Brown <[EMAIL PROTECTED]> writes:
> Anyone seen anything like this?
>
> running modperl 1.21 on linux with a work around for the corrupted PATH
> environment variable issue... perl 5.004_05 ...
>
> write(5, "HELO localhost\nONEX\nMAIL FROM: [EMAIL PROTECTED]\n0RCPT
> TO: [EMAIL PROTECTED]\n0RCPT TO: [EMAIL PROTECTED]\n0DATA\nTo:
> [EMAIL PROTECTED],[EMAIL PROTECTED]\nFrom:
> [EMAIL PROTECTED]\nSubject: Warning, tbrown paid an invoice (7851)
> and has held virtuals\n\nWarning, tbrown paid an invoice (7851)\nand has
> the following held or scheduled held virtuals:\n\nathleteschoice.net -
> 1999-08-02\n\n.\nQUIT\n0", 411) = 411
> close(5) = 0
Is it possible another function or script is doing something like:
$\ = 0;
It seems to fit the symptoms. If you can locate the code, slap a
"local" in front of the assignment and things should work properly.
To test if that's the problem, add "local $\ = undef" right before
your code. If that fixes it, you know that it's this pesky variable.
For more info on $\ and friends, check "man perlvar" for far more than
you ever wanted to know about Awk compatibility ;)
A minor note -- have you considered a module for your SMTP code
instead of hard-coding it? Net::SMTP should work. It handles all the
pesky RFC details as well. Plus chances are it'll end up being more
portable in the long run.
Chip
--
Chip Turner [EMAIL PROTECTED]
Programmer, ZFx, Inc. www.zfx.com
PGP key available at wwwkeys.us.pgp.net