Newbie question on smtp...

[Yuen, Alex]

I am having problems with smtp. I am trying to do a simple test from the
documentation and can't figure out why it is not working. I get this error
message:

        Can't call method "mail" on an undefined value at windowstest_07.pl
line 10.

Here is what I have.

****************************************************************************
*********************************
        #!/usr/local/bin/perl -w

        use Net::SMTP;

        # Section determines the domain name of smtp server.
        # $smtp = Net::SMTP->new('mailhost');
        # print $smtp->domain,"\n";
        # $smtp->quit;

        $smtp->mail('[EMAIL PROTECTED]');
        $smtp->to('[EMAIL PROTECTED]');

        $smtp->data();
        $smtp->datasend("To: [EMAIL PROTECTED]\n");
        $smtp->datasend("\n");
        $smtp->datasend("A simple test message\n");
        $smtp->datasend();

        $smtp->quit;
****************************************************************************
*********************************
This seems simple enough, but keep getting this error message.

Using ActivePerl version 5.6. 

Thanks.

Alex





-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]