
nosredavid
New User
Aug 6, 2003, 8:02 PM
Post #1 of 2
(810 views)
|
almost got it, Net::SMTP ,, been a long day
|
Can't Post
|
|
  DAMN SPELLCHECKER DIED AND I HAD TO RETYPE THIS  I've isolated the problem to the following lines of code. I am running win2kserv(named Starscream) and have tested good the SMTP service by sending mails to myself with another app. use Net::SMTP; $smtp = Net::SMTP->new('localhost'); $smtp->mail('Megatron@hotmail.com'); $smtp->to('THE_TERMINATOR'); If I run the script as is, I'll get a mail message in my SMTP's /drop folder with the top two lines saying { x-sender: megatron@hotmail.com } and { x-receiver: the_terminator@starscream } If I manually edit this and change to { x-receiver: myaddress@hotmail.com } then drop the file into my /pickup box, it instantly disappears and I also instantly get a message in my hotmail inbox. If I go back to my script and change line four to { $smtp->to('myaddress@hotmail.com'); } the script runs and seems to execute without a hitch, but no mail message ever arrives to myaddress, which is one word, no spaces, or special chars. I've also tried farfetchedly changing line 1 to { $smtp = Net::SMTP->new('hotmail.com'); } but this just takes its time to execute and finally errors with message { can't call method "mail" on an undefined value at c:\perl\sandbox\mail\mailer.pl line 5 } I'm sorely new at this and today has been a very very long day. if anyone has any ideas, please come forward. Thanks for your time p.s. I've also tried my companies mail address, thinking maybe hotmail had something in it doublechecking the accounts I was using to see if they were real(I tried using my account account to myself as well, nogo either).
|