「1/100秒まで表示」の編集履歴（バックアップ）一覧に戻る

1/100秒まで表示 - (2009/09/27 (日) 09:46:33) のソース

**Q 1/100秒まで表示させるにはどうすれば良いですか？

**A 

**1つ目の案
garadlie.plの628行目を以下のように変更します。
 return "$info[5]/$info[4]/$info[3]"　(中略)　" $info[2]:$info[1]:$info[0].". int((($$*$$)/100 - int(($$*$$)/100))*100);
//サーバーによってプロセスIDの桁が変わることがあるから下二桁を取得
//プロセスが少ないサーバーだと数字がばらけないから平方
//勝手に訂正してごめんなさい・・・

**2つ目の案
 use Time::HiRes;
 return sprintf("%04d/%02d/%02d(%s) %02d:%02d:%02d.%02d",$info[5],$info[4],$info[3],
 $week,$info[2],$info[1],$info[0],int((Time::HiRes::time - time) * 100));