#this is only one line.  I split it to fit on the page
$newLine = "<B><font color=$color>$topic</B>:$Timeis<BR>$posting<BR>--By
$person<BR><BR><!-- $postip --></font>\n";


#This is what I have to read the file into my hash
if( -e "joe.txt"){
	open(MYFILE, "joe.txt");
	$mysize= -s MYFILE;
	read(MYFILE, $mypage, $mysize);
	close(MYFILE);
	
	#I also just tried %hash = $mypage;
	@myarray = split /\n/, $mypage;
	foreach (@myarray){
		%myhash = split /=>/, $_;
	}
}

#This is how I add to my 
$myhash{$timestamp}=$newLine;

#this is how I write out.
open(TESTFILE, ">$file2");
foreach (keys %myhash)
	{
		print TESTFILE "$_=>$myhash{$_}";
	        #this is for debugging
	        print "$_=>$myhash{$_}";
	}