print $q->header("text/html\n\n"),
      $q->start_html(-title=>"Data Report"),
      "This is the report for~~<br>";

##</code><code>##

my $last_time = 0;
print $q->header("text/html\n\n"), #This is line 92
      $q->start_html(-title=>"Data Report"),
      "This is the report for~~<br>";