sub page_hash {
    my $d = Digest::MD5->new();
    $d->add( get( PAGE ) );
    $d->digest
  }