Re: Help please: I want to send myself an email with (or without) Net ::SMTP::Server from an NT 4 workstation

[Oliver Manickum]

Here is an example using Mail:Sender

<BEGINCODE>

# Mail Test Thingie

use Mail::Sender;

ref ($sender = new Mail::Sender({
      from => '[EMAIL PROTECTED]',
      smtp => 'mailserver.whereitis'})
    ) or die "Mail barf : $Mail::Sender::Error\n";

$sender->Open({to => '[EMAIL PROTECTED]', subject => ''});
($s,$m,$h,$day,$mon,$year,$r,$t,$y) = localtime(time) ;

$timenow = "$h:$m:$s" ;
$sender->SendLine("$timenow. Take me to your leader Sonny.");

$sender->Close;

print "Sent Mail" ;
exit (0) ;

<ENDCODE>

----- Original Message -----
From: <[EMAIL PROTECTED]>
To: "Perl-Win32-Users Mailing List"
<[EMAIL PROTECTED]>
Sent: Friday, May 05, 2000 8:32 PM
Subject: Help please: I want to send myself an email with (or without) Net
::SMTP::Server from an NT 4 workstation


>
>
> I want to send myself an email with (or without) Net::SMTP::Server from an
>       NT 4 workstation.  I have the module (and it's dependent modules
>       installed, but I can't get it to work????  Info about
>       Net::SMTP::Server is located at
>       http://www.macgyver.org/software/perl/
>
> Your help would be appreciated.  Thanks!
>
>
>
> ---
> You are currently subscribed to perl-win32-users as: [EMAIL PROTECTED]
> To unsubscribe, forward this message to
>          [EMAIL PROTECTED]
> For non-automated Mailing List support, send email to
>          [EMAIL PROTECTED]
>
>



---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]