You don't need to set up an SMTP host from scratch (sendmail needs a lot of study ). Use a perl script calling up the Net::SMTP module and connect to an existing SMTP host (you do have one of these, don't you?)
Here's a script that I knocked up. Call it up by piping or redirecting the message content with a message title followed by a list of users.
Code:
#!/usr/bin/perl
#(C) son_t, 2010
#Usage: sendmessage.pl "MESSAGE TITLE" <user> [<user>] < message_content_file
#Or: cat message_content_file | sendmessage.pl "MESSAGE TITLE" <user> [<user>]"
use Net::SMTP;
my $domain = "YOUR DOMAIN";
my $smtphost = "YOUR SMTP HOST";
my $sending_user = `/usr/ucb/whoami`;
chop($sending_user);
my $server = `/usr/bin/hostname`;
chop($server);
my $subject=shift(@ARGV);
my @users = @ARGV;
if (!@users) {
print STDERR "Must specify one or more users\n";
exit 1;
}
# qualify addresses
for (my $i = 0; $i < @users; $i++) {
$users[$i] = $users[$i] . "\@$domain" if ($users[$i] !~ /\@/);
}
# connect
#print "connect smtphost:$smtphost server.domain:$server.$domain\n";
$smtp = Net::SMTP->new("$smtphost",Hello=>"$server.$domain");
if (!defined($smtp)) {
print STDERR "Error connecting to server\n";
exit 1;
}
# setup
#print "setup $sending_user\@$server.$domain\n";
$smtp->mail("$sending_user\@$server.$domain");
$smtp->recipient(@users);
$smtp->data();
# header
my $tousers = join(', ', @users);
#print "header tousers:$tousers sending_user:$sending_user\@$server.$domain subject:$subject\n";
$smtp->datasend("To: $tousers\n");
$smtp->datasend("From: $sending_user\@$server.$domain\n");
$smtp->datasend("Subject: $subject\n\n");
# body
$smtp->datasend(<STDIN>);
# finish
$smtp->dataend();
$smtp->quit;
It would be nice to see your (or anybody's) disk usage monitoring script, if you've written one. I've got one, which I found on the web and modified for my own use (which I could post if anyone is interested.)
I have been a member for almost a year now. I have always recieved email notifications when I select "subcribe to this thread" at the bottom of posts that I reply to.
However, over the last month or so, I have not been recieving email notification of replys to posts I respond to.
I have... (6 Replies)
Hi.
I want to add email notification so when the my script finishes it sends out an email of the results to our team. If there are errors the subject on the email should say there were errors.
If any having idea/sample scripts pls share with me. (2 Replies)
Hey guys
Just need some help with crontab.Iam looking for a script that will alert particular user about its change through sendmail.We are using bash here.
--CoolKid (3 Replies)
Hi,
I'm fairly new to Aix and am looking for some help on the following.
I have setup a cron job under root and want it to send the email once it's run to an external email address. I can get it to send the output in an email to me by using mail on the end of the crontab entry. But I would... (1 Reply)
hi guys
I hope this goes here
Have someone used Linux heartbeat to send email when the Slave server becomes the Master?
I've read I can configure the MailTo under
/etc/ha.d/resource.d
but I really don't know how to do it.
I basically need my primary server to send an email when it... (2 Replies)
Hi
All of a sudden the syslog daemon in the server went down and then later I started it manually
# ps -ef | grep syslogd
root 217228 114906 0 Nov 16 - 0:00 /usr/sbin/syslogd
root 430306 290870 0 14:18:11 pts/0 0:00 grep syslogd
Can some one help me with a script which will monitor the... (2 Replies)
Hi,
I am using spacewalk tool ( Linux systems management solution ). I have configured probe notification and notification method in spacewalk.
But I am not getting the notification mail.
Checked the /var/log/maillog and the error message as follows,
Dec 11 17:01:11 spserver... (2 Replies)
Hi All,
I need write a linux script which emails each record to the employee manager email-id which will be specified inside the file.
Each employee can have a different manager too..
file contain 200 to 300 records
Employee ID, Employee Name, Employee Email-ID, Manager, Manager... (4 Replies)
Hi,
I am getting error below when testing email. is there a way I can configure email on Solaris?
SunOS -s 5.10 Generic_147440-04 sun4u sparc SUNW,SPARC-Enterprise
echo "hello" | sendmail -v abcd
WARNING: local host name (-s) is not qualified; see cf/README: WHO AM I?
abcd... Connecting... (1 Reply)
Discussion started by: roshanbi
1 Replies
LEARN ABOUT REDHAT
smtp
smtp(n) smtp client smtp(n)
NAME
smtp - Client-side tcl implementation of the smtp protocol
SYNOPSIS
package require Tcl
package require mime ?1.3.2?
package require smtp ?1.3.2?
::smtp::sendmessage token option...
DESCRIPTION
The smtp library package provides the client side of the smtp protocol.
::smtp::sendmessage token option...
This command sends the MIME part (see package mime) represented by token to an SMTP server. options is a list of options and their
associated values. The recognized options are:
-servers
A list of SMTP servers. The default is localhost.
-ports A list of SMTP ports. The default is 25.
-queue Indicates that the SMTP server should be asked to queue the message for later processing. A boolean value.
-atleastone
Indicates that the SMTP server must find at least one recipient acceptable for the message to be sent. A boolean value.
-originator
A string containing an 822-style address specification. If present the header isn't examined for an originator address.
-recipients
A string containing one or more 822-style address specifications. If present the header isn't examined for recipient
addresses). If the string contains more than one address they will be separated by commas.
-header
A list of keywords and their values (may occur zero or more times).
If the -originator option is not present, the originator address is taken from From (or Resent-From); similarly, if the -recipients option
is not present, recipient addresses are taken from To, cc, and Bcc (or Resent-To, and so on). Note that the header key/values supplied by
the -header option (not those present in the MIME part) are consulted. Regardless, header key/values are added to the outgoing message as
necessary to ensure that a valid 822-style message is sent.
The command returns a list indicating which recipients were unacceptable to the SMTP server. Each element of the list is another list, con-
taining the address, an SMTP error code, and a textual diagnostic. Depending on the -atleastone option and the intended recipients, a non-
empty list may still indicate that the message was accepted by the server.
SEE ALSO
mime, pop3, ftp, http
KEYWORDS
mail, mail, email, smtp, mime, rfc821, rfc822, internet, net
mime 1.3.2 smtp(n)
04-01-2010
). Use a perl script calling up the Net::SMTP module and connect to an existing SMTP host (you do have one of these, don't you?)