open(DATAFILEIN,"$catagory.dat") || print "This section is currently empty...Please check back often!";
			print "<table border=1 width=\"95%\">";
			while (<DATAFILEIN>) {
				chomp $_;
				@line_pair = split(/=/,$_);
				$time = $line_pair[0];
				$name = $line_pair[1];
				$email= $line_pair[2];
				$phone= $line_pair[3];
				$subject= $line_pair[4];
				$data= $line_pair[5];
				$time2 = $line_pair[6];
				$data = &stripBadHtml($data);
				$password= $line_pair[8];
				$pictureurl= $line_pair[7];
				$priceline= $line_pair[9];