unk


1
2
3
4
5
6
7
8
9
10
11
12
13

#!/bin/sh -e
alias c=cat q=test e=echo
rm -rf O;mkdir -p O
q -f TM||e '`<$F`'>TM
q -d S&&cp -r S O/
X(){ eval "$(e 'c<<ZZ';c "$@";e;e ZZ)";}
for F in I/*;do
q -f "$F"&& (e $F
N="${F#I/}"
T(){ sed 1q "$F";}
B(){ sed 1d "$F";}
X TM>"O/${N%%.*}.htm")
done