I am sorry I asked this question a while back but my computer crashed and
lost all my documentation.
I am trying to output text from a doc. that I am reading to an email I am
sending but it is not working.
Here is my code:
print STDERR "\nline: ", substr($line, 43, 7); ---This outputs the word
"Running" as it should
use Mail::Sendmail; #Send and email if there are errors
%mail = ( To => '[EMAIL PROTECTED]',
From => '[EMAIL PROTECTED]',
Subject => print STDERR "\nline: ", substr($line, 43,
7),----This outputs "1" WHY?
Message =>
);
sendmail(%mail) or die $Mail::Sendmail::error;
print "OK. Log says:\n", $Mail::Sendmail::log;
Thank you to everyone that has been helping me with this first of many
scripts. It has definitely been a learning experience
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
