if ($ENV{'REQUEST_METHOD'} eq "POST") {

	open(IN,"lightbox.log");
	@lines = <IN>;
	close(IN);

	($sec,$min,$hour,$mday,$mon) = localtime(time);
	$date = sprintf("%02d/%02d-%02d:%02d:%02d",$mon+1,$mday,$hour,$min,$sec);

	open(OUT,">lightbox.log");
	$Form{"Data"} =~ s/\r//g;
	$Form{"Data"} =~ s/\n//g;
	unshift ( @lines, $date . "\t" . $Form{"Data"} . "\n" );
	print OUT @lines;
	close(OUT);

}