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:
parent
d05e386079
commit
6eb582506f
1 changed files with 8 additions and 2 deletions
10
signcontrol
10
signcontrol
|
@ -1,6 +1,6 @@
|
||||||
#!/usr/local/bin/perl5 -w
|
#!/usr/local/bin/perl5 -w
|
||||||
# written April 1996, tale@uunet.uu.net (David C Lawrence)
|
# written April 1996, tale@uunet.uu.net (David C Lawrence)
|
||||||
# Version 1.2
|
# Version 1.2.1
|
||||||
|
|
||||||
# CONFIGURATION
|
# CONFIGURATION
|
||||||
|
|
||||||
|
@ -36,7 +36,13 @@ $id_host = 'FULL_HOST_NAME';
|
||||||
# how can a standards-compliant date header be generated?
|
# how can a standards-compliant date header be generated?
|
||||||
# this gets substituted into a perl backtick expression,
|
# this gets substituted into a perl backtick expression,
|
||||||
# so be careful with the quoting.
|
# 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.
|
# headers to sign. Sender is included because non-PGP authentication uses it.
|
||||||
@signheaders = ('Subject', 'Control', 'Message-ID', 'Date', 'From', 'Sender');
|
@signheaders = ('Subject', 'Control', 'Message-ID', 'Date', 'From', 'Sender');
|
||||||
|
|
Loading…
Reference in a new issue