diff --git a/server.pl b/server.pl index eca6903..65f9858 100644 --- a/server.pl +++ b/server.pl @@ -539,7 +539,14 @@ EOF my $escapedPlan = encode_entities($plan->{'plan'}); $escapedPlan =~ s/\n/
/g; $escapedPlan =~ s/(
)*$//; - my $body = "document.getElementById('dotplan').innerHTML = '$escapedPlan';"; + my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($mtime); + $year += 1900; + $mon++; + my $fmtMtime = sprintf('%d-%02d-%02d', $year, $mon, $mday); + my $body = < 'application/javascript', 'Last-Modified' => HTTP::Date::time2str($mtime)