index

2001年 9月
          1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
2001年 10月
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 31        
2001年 11月
      1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    

アレ

  ▽20011015c #日記

 アンケートの HTML を作る作業があまりに面倒なので, データ定義ファイルを読んで HTML やチェック用 JavaScript を自動生成するツールを作成. 定義ファイルといっても,ただ perl で require するだけの変数代入文なんだけどね. 無名ハッシュと無名変数と bare word string を使うと, ただの代入文も,とっても定義ファイルっぽくなって良し.

 つまりどんなんかってーと,

    $enquete[ 0 ]{ 'TEXT' } = 'enquete text 1';
    $enquete[ 0 ]{ 'OPT'  }[ 0 ] = 'option 1';
    $enquete[ 0 ]{ 'OPT'  }[ 1 ] = 'option 2';
    $enquete[ 1 ]{ 'TEXT' } = 'enquete text 2';
    $enquete[ 1 ]{ 'OPT'  }[ 0 ] = 'option 3';
    $enquete[ 1 ]{ 'OPT'  }[ 1 ] = 'option 4';
 これを以下のように書けるということ.
    @enquete = [
        {
            TEXT => 'enquete text 1',
            OPT  => [
                'option 1',
                'option 2',
            ],
        },
        {
            TEXT => 'enquete text 2',
            OPT  => [
                'option 3',
                'option 4',
            ],
        },
    ];

 後者の方が長いけど見やすいでしょ?(笑)

  ▽20011015b #日記

 昼休みに鑑賞するが,やっぱしせめて日本語の解説が欲しいかなー(贅沢(笑)  今週末の NHK-BS でも放映は解説が石見さん?  とりあえずこっちも録画ヨヤーク.

  ▽20011015a #日記

 3:00 就寝,8:30 起床. 今日の 5:00 から CATV でやってた「CART 第19戦 ラグナセカ」を録画しといたので, 朝それを CD-R に焼いて持って出社.

index