|
zunbe |
|
|
|
||
 |
2007年1月 | 2007年3月 |  |
|
| ［<<先頭］ ［<前へ］ [ 1 2 3 4 ] | ||
|
内科の検診に行ってきた。
先月行った献血の血液検査の結果は、少し良くない方向への兆しがあったので心配していたのだが、今回は、少し高い値が出てしまった。
■血糖
113mg/dl。
バッチリだ。
■AST、ALT、γ-GTPなどの肝臓系
それぞれ、22U/L、29U/L、56U/L。
γ-GTPの値が少し高めだが、すべて正常値の範囲内。
バッチリだ。
■グリコヘモグロビン
7.2%。
アウト。
正常値の範囲から出てしまった。(T_T)
■中性脂肪
160mg/dl。
アウト。
正常値の範囲から出てしまった。(T_T)
■HDLコレステロール
42mg/dl。
正常値の範囲内。
バッチリだ。
■LDLコレステロール
174mg/dl。
アウト。
正常値の範囲から出てしまった。(T_T)
まとめると、こんな感じ。
ずんべの血液
ちょっと気を抜きすぎたかな。
運動量は、むしろ増えているはずなのだが、やはり、食事の量か。
頑張ろう。
このエピソードはいかがでしたか？   |  |
投稿者 zunbe : 2007/02/07 04:12:19 | コメント (0) | トラックバック (0)
2007/02/06
|
まず、最近、新聞に掲載された記事をふたつ。
中日新聞 2007/02/01 掲載記事
中日新聞 2007/02/06 掲載記事
なんか最近、自転車の居場所が、少しづつ狭くなっているような気がする。
これは、昨年11月に自転車対策検討懇談会なる会から出された「自転車の安全利用の促進に関する提言」と関係があるのかと勘ぐりたくなる。
自転車の走行を規制しようとする動きの布石なのだろうか？
| このエピソードはいかがでしたか？ | |
投稿者 zunbe : 2007/02/06 06:22:04 | コメント (2) | トラックバック (0)
2007/02/04
|
今日は愛知県知事選挙の日。
今回の選挙は、春の統一地方選挙、夏の参議院選挙前哨戦と位置付けられているらしく、各政党、幹部クラスを連日投入しての激戦になっているらしい。
一月ほど前から、新聞などで選挙公約や方針などが掲載されていたが、残念なのは、国会でも問題となっている、柳沢厚生労働相「女性は産む機械」発言がこの選挙に持ち込まれてしまった事。
今回の選挙は、重要な選挙であるのはわかるのだが、「女性は産む機械」発言と愛知県知事選挙とは関係ないだろう。
相手の候補者を潰そうとするのではなく、自身が行う政治を県民に理解されるように努力する選挙戦をやってほしいと思う。
それはともかく、朝一番で選挙に行ってきた。
投票所
けっこうな人手だ。
高い投票率が期待できるだろうか。
結果が楽しみだ。
| このエピソードはいかがでしたか？ | |
投稿者 zunbe : 2007/02/04 05:43:55 | コメント (2) | トラックバック (0)
2007/02/02
|
久しぶりのプログラミングねた。
IIS上でわかち書きをするプログラムを作成した。
使用したわかち書きモジュールは KAKASI Win32 。
WEB のフォームから入力された文章を、KAKASI を使用してわかち書きしようとトライした。
まっとうな方法としては…
(1).KAKASI Win32 に含まれているライブラリを呼び出す ActiveX を作成し、
(2).それを Windows にインストールし、
(3).IIS上から Server.CreateObject() でオブジェクトを作成して利用する。
であろうが、サーバ機は手元にあるわけではないし、Administrator 権限をもっているわけでもないので、ActiveX から呼び出す方法は選択したくない。
そこで、実行プログラムである KAKASI.EXE をIIS上から起動して実装する事にした。
実行プログラムをIIS上から起動する方法はいろいろあるのだが、どうも、うまくいかない。
まず、前提として、以下の問題がある。
KAKASI.EXE は、標準入力から文章を読み込んで、標準出力に吐き出すフィルタである。
KAKASI.EXE のオプションに、入力ファイル、出力ファイルを指定するオプションは無い。
つまり、KAKASI.EXE を使用するためには、パイプライン／リダイレクトを使用した形で実装する必要がある。
■方法１…BASP21の Execute() を使用する
とりあえず、もっとも簡単そうなので、試してみた。
が、BASP21 の Execute() は、標準入力からデータを流し込む事ができない。
仕方がないので、ソースの文章を一旦ファイルに書き出しておいて、TYPEコマンドでファイルを読み出し、パイプで KAKASI.EXE に流し込むようにしてみる。
Set objBASP = Server.CreateObject("basp21")
rc = objBASP.Execute("CMD.EXE /c TYPE 入力.txt | KAKASI.EXE -w", 1, o)
このコードを実行すると、見事にフリーズした。
IISは生きているようだが、ブラウザは返ってこない。
KAKASI.EXE が、標準入力のクローズを待っているようだ。
これはきっと、UNIX で言うと、こんなコマンドを打ったような状態だろうか。
cat
延々と標準入力がクローズされるのを待ちつづけている感じ。
もしかして、標準出力へ吐き出せないのかと疑って、以下のコードも試してみた。
Set objBASP = Server.CreateObject("basp21")
rc = objBASP.Execute("CMD.EXE /c TYPE 入力.txt | KAKASI.EXE -w > 出力.txt", 1, o)
「出力.txt」は作成されるが、サイズは0バイト。
テキストエディタで開いても、ロックがかかっていて書き込めないというエラーが表示される。
つまり、IISが出力ファイルとして、このファイルを捕まえているという事であろう。
これはきっと、UNIX で言うと、こんなコマンドを打ったような状態だろうか。
cat > 出力.txt
出力ファイルを作成して、延々と標準入力がクローズされるのを待ちつづけている状態か。
ちなみに、以下のコードは、きちんと「入力.txt」の内容を出力できる。
Set objBASP = Server.CreateObject("basp21")
rc = objBASP.Execute("CMD.EXE /c TYPE 入力.txt", 1, o)
つまり、「入力.txt」が読めていないわけではない。
と、いう事は、BASP21 の Execute() 内では、パイプが使えないという事なのだろうか。
■方法２…WshShell の Exec() を使用する。
Exec() は、標準入力からデータを流し込んで、標準出力から取り出す流れになるので、もっとも望んでいる形なのだが、やはりうまく動かない。
Set objShell = Server.CreateObject("WScript.Shell")
Set objExec = objShell.Exec("KAKASI.EXE -w")
Call objExec.stdin.Write("入力")
Call objExec.stdin.Close()
o = objExec.stdout.ReadAll()
フリーズはしないが、出力は常に空。
試しに、同じコードを WSH にして実行してみると、きちんと動作する。
プログラムがおかしいわけではない。
どうも、IIS上ではパイプラインをうまく通せないようだ。
困ったゾ。
■方法３…WshShell の Run() を使用する。
Run() は、標準入出力を扱えないので、入力、出力とも、テンポラリ・ファイルを介するようにするしかない。
Set objShell = Server.CreateObject("WScript.Shell")
Call objShell.Run("CMD.EXE /c TYPE 入力.txt | KAKASI.EXE -w > 出力.txt", 0, True)
おっ！
うまくいった。(^^)
わかち書きされたテキストが、「出力.txt」に吐き出された。
どうやら、Run() は、姑息な事はせずに、渡されたコマンドラインをそのまま実行する単純な動作の様だ。
おそらく、完全に分離されたシェル起動して、IISとは干渉しない世界で動作するのだろうな。
いちいちテンポラリファイルを介する必要があって、いちいちシェルが起動されるようなので、処理速度的には難があるように思うが、とりあえず、これでOK。
近いうちに、ActiveX からの呼び出しをトライしてみよう。
しかし、IIS上でパイプラインがどうにもうまく働かないのは、少し解せない。
パイプラインくらい、Windows というシステム全体の中で、一貫して動作して欲しいのだが、様々な場面で、いろいろ挙動が変化するのは、きっと、海よりも深いわけがあるんだろうな。
| このエピソードはいかがでしたか？ | |
投稿者 zunbe : 2007/02/02 09:50:16 | コメント (2) | トラックバック (1)
|
| ［<<先頭］ ［<前へ］ [ 1 2 3 4 ] | ||