Version 1.2.1. Hard-code the time zone for date since some installations

don't support %Z.  Add an example for SunOS 4.
This commit is contained in:
David Lawrence 1996-10-23 17:33:17 +00:00
parent d05e386079
commit 6eb582506f

View file

@ -1,6 +1,6 @@
#!/usr/local/bin/perl5 -w
# written April 1996, tale@uunet.uu.net (David C Lawrence)
# Version 1.2
# Version 1.2.1
# CONFIGURATION
@ -36,7 +36,13 @@ $id_host = 'FULL_HOST_NAME';
# how can a standards-compliant date header be generated?
# this gets substituted into a perl backtick expression,
# so be careful with the quoting.
$get_date = "/usr/local/gnu/bin/date -u '+%a, %-d %h %Y %T %Z'";
# -0000 is hardcoded here as GMT/UTC zone because in some installations
# the %Z flag does not work.
$get_date = "/usr/local/gnu/bin/date -u '+%a, %-d %h %Y %T -0000'";
# this expression works with SunOS 4's date; note that a formatted date string
# is not used because it doesn't support four digit years
# $get_date = '/bin/date -u | /bin/awk \'{print $1 ",", $3, $2, $6, $4, $5}\'';
# headers to sign. Sender is included because non-PGP authentication uses it.
@signheaders = ('Subject', 'Control', 'Message-ID', 'Date', 'From', 'Sender');