my $url= $Server . "/cgi-bin/DB_NewTerm.pl";
		my $data = { record => \@record};
		
		my $request = POST($url, Content_Type=>'application/json',
			Content => encode_json($data) );
		my $response = $ua->request($request);
		print $response->content, "\n";

##</code><code>##

	my @record=(
		$Tag1, $Tag2, 
		$CommentAll,
		$today
	);

##</code><code>##

	my @record=(
		$Tag1, $Tag2, 
		$CommentAll,
		"$today"
	);