#!/usr/bin/perl
-# $Id: db2html.in,v 1.14 2003/05/03 20:01:20 doogie Exp $
+# $Id: db2html.in,v 1.15 2003/05/25 13:19:13 joy Exp $
# usage: db2html [-diff] [-stampfile=<stampfile>] [-lastrun=<days>] <wwwbase>
#load the necessary libraries/configuration
require("$lib_path/errorlib");
$ENV{'PATH'} = $lib_path.':'.$ENV{'PATH'};
+use POSIX qw(strftime);
+
#set current working directory
chdir("$gSpoolDir") || die "chdir spool: $!\n";
'forwarded','forwarded to upstream software authors');
#set timestamp for html files
-chop($dtime=`date -u '+%H:%M:%S GMT %a %d %h'`); $? and die $?;
+$dtime = strftime "%a, %e %b %Y %T UTC", localtime;
$tail_html =~ s/SUBSTITUTE_DTIME/$dtime/;
#check for commandline switches