TypeSetting/MakingOfProceedings/DocToLaTeX
use encoding 'utf8'; s/\r//; s/ //g; s/\n/ /g; s/[[:blank|]]/ /g; s/ +/ /g; s/^[[:blank|]]//g; s/$[[:blank|]]//g; s/&/&/g; s/<SUP>([^<]-)<\/SUP>/FootNote{$1}/g; s/<I>([^<]-)<\/I>/%$1%/g; s/''([^<]-)<\/B>/@$1@/g; s/<\/[Pp]>/\n\n/g; s/<[^>]->//g; s/% -%//g; s/%([^%]-)%/\\textit{$1}/g; s/@ -@//g; s/@([^@]-)@/\\textbf{$1}/g;
後処理が必要なので,次のようにする(上のファイルを xxx.pl とする).
$ perl -p xxx.pl input.html > perl -pe 's/^ + //g' > sed '/^ -$/d' > sed 's/$/\n/' >output.txt
次に,脚注の部分だけを fn.txt に保存する.
$ sed '/^ -$/d' <fn.txt > sed 's/[0-9]- //;' >fn1.txt
として,脚注ごとに1行にされた fn1.txt を準備する.行頭の脚注番号は削除されている.
この fn1.txt を配列で読み込んで FootNote{1} に書き出していく.