なかのにっき

最新版はこちら。突っ込みは各日付の BBS エントリのほか、メール (nakano@st.seikei.ac.jp) やフォームからどうぞ。なおスパム除けのため、BBS 機能には緩い認証を入れています。検索エンジンから来た方は、エンジンの方のキャッシュを見るか、下の簡易検索を試してみてください。

去年のを参考に作業。2acceptelist/ が作業場。

submission data を perl スクリプトでまとめて雛型のテキストを作る
UTF-8 を実体参照にするため、一度 word で読み込んでセーブ
Ooo Write で .doc を読んで html へ
html を別の perl スクリプトに通して整形

して完成。最終手順の整形スクリプトは以下のような酷いもの。

while (<>){
  chomp;
  $body .= "$_ ";
}

$body =~ s/  / /g;
$body =~ s/^.+?<\/HEAD>/$header/s;
$body =~ s!<BODY.*?>!<BODY LANG="en-US" DIR="LTR">\n!;
$body =~ s!<P STYLE.*?>!<P>!g;
$body =~ s!</P>!</P>\n!g;
$body =~ s!<FONT.*?>!!g;
$body =~ s!</FONT>!!g;
$body =~ s!<SPAN.*?>!!g;
$body =~ s!</SPAN>!!g;
$body =~ s!&lt;sup&gt;!<sup>!g;
$body =~ s!&lt;/sup&gt;!</sup>!g;
$body =~ s/\n /\n/g;
$body =~ s/ +</</g;
$body =~ s!<P>(.*?)</P>!\1<BR>!g;
$body =~ s!<BR><BR>!<BR>\n<BR>!g;
$body =~ s!</BODY></HTML>!</BODY>\n</HTML>!g;

print $body;

BEGIN {
  $header = << 'EOM';
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
    <META HTTP-EQUIV="CONTENT-TYPE" CONTENT="text/html; charset=en-US">
    <TITLE>ISSP2009 Accepted List</TITLE>
</HEAD>
EOM
}

その後 3progbase/ に移動、プログラムのデータを別途編集、去年の perl script をいじって叩き台の html を吐いて完成。データを編集するのは明日の確定を待ってから。

なかのにっき

2009年02月12日(木) [n年日記]

#1 給油

#2 [labo] 年度末向けお買い物

#3 [issp] プログラム作り