#!/usr/local/bin/perl -i

open(F,"+< $new_guestbook.html") or die "Could not open F: $!";
$out = '';
while(<F>){
	s/date/localtime/eg;
}
seek(F,0,0);
print F $out;
truncate(F,tell(F));
close(F);