From: "Lance Prais" <[EMAIL PROTECTED]>
> I am reading from a log file that is generated from with in SIEBEL
> using a SIEBEL command and parsing though it for errors then if there
> is an error found I need to send en email to someone.
>
> You are correct about not having to use the web server so I decided
> that it was inefficient. I am going to try to connect to the Smtp
> server directly. using perl here is my code:
>
> my $mailprog = 'smtp.ts.checkpoint.com'; #set mail program
>
> #Set variables for each of the fields in the form
> #my $error = param ('error'); #error
> #my $workflow = param ('workflow'); #workflow
>
> open(MAIL,"|$mailprog -t");---THIS WOULD BE LINE 20
Wow ... you can't do it like this. The open( HANDLE, "|something")
tries to run a program "something". And of course there's no
program named "smtp.ts.checkpoint.com".
To send the mail via SMTP you should use a module.
Net::SMTP for example.
Jenda
=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain.
I can't find it.
--- me
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
