#!/bin/sh
X()(eval "dd<<.
`awk -vRS= '!/^</{$0="<p>"$0"</p>"}//'`
.");N()(X<T>${n%.n});<T||echo '`X<$n`'>T
<L&&. ./L;for n in *.n;do N;done