Compaq AlphaServer GS80 User Manual page 221

# Revision History:
# V1.0 - Nov 2000. First Release.
# V2.0 - Oct 2001. Fix smtp incompatibility.
#
# Additional Information:
# To check for updated versions of this file, check the
# web-site below:
# www.compaq.com
#-
#------------------------------------------------------------
#+
# NOTES:
# 1. This is written using a simple style of the PERL
# programming language.
#
# 2. In PERL, a single character match is the period (".").
# This contrasts with the ConsoleWorks program in which the
# percent ("%"), is a single character match.
#
# 3. In both PERL and ConsoleWorks, the multiple character
# matching is with the asterisk ("*").
#
# 4. WinNT can not start a PERL file directly. The MAIL.BAT
# file is used to start this file. MAIL.BAT contains the
# code line of:
# C:\Perl\Bin\Perl C:\Cwks\Actions\Event\mail.pl %1 %2 %3
# %4 %5 %6
#
# 5. MAIL.BAT can pass up to six arguments to MAIL.PL. The
# meaning of each of these arguments is described below:
# $ARGV[0] Console name
# $ARGV[1] Event Name
# $ARGV[2] Event Sequence Number
# $ARGV[3] Name of event context file - Commonly referred
#
# $ARGV[4] Contact name(s) for those who should receive
#
# Note: Delimit using commas when there are multiple
#
# $ARGV[5] User Supplied Parameter - However currently
#
#-
#------------------------------------------------------------
#
use Socket;
sub smtpmail {
my ($to, $subj, $whoami, $mf, @msg) = @_;
my ($port, $iaddr, $paddr, $proto, $line);
# This setting would supercede the one in the block comments
Compaq-Supplied Configuration Files for ConsoleWorks
to as a "Log File".
e-mails.
names.
MAIL.PL doesn't use this.
B-9