竹Blog

• ディスク2本
• OS は Vista なら Ultimate か Bussines
• メモリたくさん

• 起動しないディスクを SATA→USB 変換コネクタでノートPCにつないでみた
  • かっしゅんかっしゅん言わずに普通に認識
• スキャンディスクを掛けてみる
  • エラー修復された
• ディスクをメイン PC につなぎ直して起動
  • 起動した
• 念のため詳細にディスクのエラーをチェックしてくれるツールで確認
  • エラークラスタなし
  • S.M.A.R.T 情報にも問題なし

1. ありもののハードディスクに XP をクリーンインストール
   • できるなら壊れたディスクのディスクイメージをコピー
2. ありもののハードディスクに Vista x64 をクリーンインストール
3. 同程度の性能の PC は 中古だと 4万円くらいなので買ってくる
   • 馬鹿でかいPCからおさらばしたいけど、できればディスク2本積みたいなぁ

• 今時だとノートPCのグラフィック機能でも外付けディスプレイに 1920x1200 で表示できる
  • ゲーマーでもないのにこのためだけに高性能グラフィックカードを買ってた時期もありました
• Core2Duo 2.2GHz なので処理速度は問題ない
• メモリ 1GB はちょっとさびしいかも?
  • グラフィックに 150MB くらいとられる
• UO くらいならまぁ、動く

• Vista は Me よりちょっとマシな程度に○んこ
  • Me 知らんけどね
• Vista だと G-XTH がさくさく落ちる
• Vista だと UO の日本語入力の変換ウィンドウの位置がおかしい
  • マニアックな言葉で言うと、Preedit style が root

• パスワード変更機能の追加
• BOD管理CGIについて の下の方にリストアップしてあるもののうち、ただのバグであり実装されている必要があるものを実装
• 静的ファイルのモジュール化
  • 管理者ツールと共有するデータがあったのですごい楽になりました。俺が。

• きっと細工ルニックにも楽しく対応できるはず。
• きっとローカライズにも苦々しくも対応できるはず。

#! /usr/bin/perl
use strict;
use utf8;

while (<>) {
  chomp;
  my $str = $_;
  utf8::decode($str);
  $str =~ /(Bulk Order Deed Blessed) (重量: \d) (小口|大口) (\w+(?: ingot(?:s)?| leather)?) (高品質|標準) (個数: \d+)/igc;
  my $a = $1;
  my $b = $2;
  my $c = $3;
  my $d = $4;
  my $e = $5;
  my $f = $6;
  utf8::encode($a);
  utf8::encode($b);
  utf8::encode($c);
  utf8::encode($d);
  utf8::encode($e);
  utf8::encode($f);
  print "\$1: [$a] \$2: [$b] \$3: [$c] \$4: [$d] \$5: [$e] \$6: [$f]";
  while ($str =~ /\G \w((?:\w|\s)+: \d+)/gc) {
    my $a = $1;
    utf8::encode($a);
    print " [$a]";
  }
  print "\n";
}

続きを読む