===================================================================
RCS file: /home/cvs/OpenXM/src/asir-port/cgi/cgi-asir-r-markov.sh,v
retrieving revision 1.1
retrieving revision 1.4
diff -u -p -r1.1 -r1.4
--- OpenXM/src/asir-port/cgi/cgi-asir-r-markov.sh	2013/01/31 06:50:08	1.1
+++ OpenXM/src/asir-port/cgi/cgi-asir-r-markov.sh	2014/07/30 06:54:56	1.4
@@ -1,11 +1,21 @@
 #!/bin/bash
-# $OpenXM$
+# $OpenXM: OpenXM/src/asir-port/cgi/cgi-asir-r-markov.sh,v 1.3 2013/09/26 04:13:40 takayama Exp $
 ## Replace $OpenXM_HOME by an absolute path of your cite.
+export OpenXM_HOME=/private/taka/OpenXM
+export HOME=/tmp
+## Note that OpenXM_tmp is set in the dot.bashrc below as HOME/.OpenXM_tmp
 source $OpenXM_HOME/rc/dot.bashrc
 #source /home/taka/OpenXM/rc/dot.bashrc
 export TMP=/tmp
 export CGI_ASIR_ALLOW="[(version) (asir_contrib_copyright) (r_markov)]"
 export CGI_ASIR_TLIMIT="3600"
 export OX_ASIR_LOAD_FILE=$OpenXM_HOME/src/asir-port/cgi/r-markov.rr
-sm1 -q -s "[(parse) (cgiasir.sm1) pushfile] extension oxNoX cgiAsir quit "
+export CGI_ASIR_MSG="<pre>
+ Example. r_markov([[1,1,1,1],[0,1,2,3]]) 
+</pre><br>"
+WFILE=/tmp/tmp-post-$$.txt
+tee /tmp/t.txt | oxdecode_post >${WFILE}
+env CONTENT_LENGTH=`wc -m ${WFILE} | awk '{print $1}'`  sm1 -q -s "[(parse) (cgiasir.sm1) pushfile] extension oxNoX cgiAsir quit " <${WFILE}
+rm -f ${WFILE}
+exit 0