3
# Convert an ej document to an HTML document; which we then make a text
4
# document. This is designed to "sew" together text data files
5
# using the ej system and the relevent parts of the data files in <pre>
7
# The perl script simply elimanates everything before a pre tag and
8
# everything after a /pre tag
10
if [ ! -d ~/tmp ] ; then
11
echo ~/tmp directory is required
14
ej2html < $1 > ~/tmp/$$.html
15
cat ~/tmp/$$.html | perl -e \
16
'while(<>){$a.=$_};$a=~s|.*<pre>(.*)</pre>.*|$1|si;print $a'