use POSIX qw/strftime locale_h/; 
...
my $oldlocale = setlocale(LC_TIME);
setlocale(LC_TIME, "C");
$Header{'Date'} = strftime("Date: %a, %d %b %Y %H:%M:%S %z", localtime);
setlocale(LC_TIME, $oldlocale);