Help for this page
perl -lne "print $first++? q{</div><div>}:q{<div>} and next if 0==inde +x $_, "[Sidenote"; print; print q{</div>} if eof" letters.txt