Basic CGI can even make the html a lot better, like so:

     ...
use CGI qw(:standard);

my $q = CGI->new;
print $q->start_html( -title => 'Yesterday Hits' ),
      $q->h1("today is: $tm"), 
      $q->h3("Yesterday was $yesterday"),
      $q->table(
          { border => '1', cellpadding => '10', width => '500' },
          Tr( td("Total Hits: $totalhits"), td("Hits Yesterday: $yeste
+rdayHits"), )
      ),
      $q->end_html;
[download]