cgi述語表現(Network,PORTNO,_述語,_ＣＧＩ述語表現) :-
url述語表現(_述語,_ＵＲＬ述語表現),
concat_atom(['http://',Network,:,PORTNO,prolog_file,'?query=%3F-+',_ＵＲＬ述
語表現],_ＣＧＩ述語表現),
! .

url述語表現は例の漢字コードの変換です。