11/04/29 23:34:06.19 Ea2aco4u0
# perl環境があるのなら、これで変換できるはず。
# sample.edf をあなたのファイルの名前に直せばいい
$fn = "sample.edf" ;
open FH, "< $fn" ;
open OUT , "> 階層付きテキスト形式.txt" ;
while (<FH>) {
$c=0,$f=1 if (/::Page::/ and $f==0) ;
print OUT "."x($_+1) if ($c==1) ;
print OUT if ($c==2) ;
$w=1,next if (/begin{{/) ;
$w=0,$f=0 if (/}}end/) ;
$c++ if ($f==1) ;
print OUT if ($w==1) ;
}
close OUT ;
close FH ;