On Sun, 12 Aug 2001 22:25:40 -0500, "Paul D. Price" <[EMAIL PROTECTED]> wrote: >I am trying to send email in Perl using the Net::SMTP module, with >the script below, taken from the MacPerl book. I am getting sluugish >performance (PB G3 250 attached to cablemodem thru an xrouter) and >out of memory messages every time this script runs, and I have set my >memory partition to 70MB! Any suggestions? Get some software that can monitor network traffic and have a look at the TCP stream that is established between your PowerBook and the mail server. (I personally use Interarchy <http://www.interarchy.com/> for that, and a whole bunch of other things.) When you monitor the data packets being produced, you'll probably find that your script and the mail server are stuck in an infinite loop exchanging (or at least trying to exchange) some piece of information. It should be obvious what line of code that information is connected with. Devise a workaround. Henry. PS: $smtp = new Net::SMTP($host,Debug,1); will also give you a bunch of low-level stuff. It might be enough, so you should probably try it first. But if you don't get any satisfaction that way, the unbiased (unfiltered) opinion of a 3rd-party utility will help get to the bottom of things.
