糖尿病食

ふくろう
平成9年の糖尿病実態調査によると、「糖尿病が強く疑われる人」の690万人と「糖尿病の可能性を否定できない人」の680万人を合わせると、全国に1,370万人いると推定されているんだ。でも、糖尿病で治療を受けている人は約212万人（平成11年患者調査による総患者数）しかいない。
とら
なんでそんなに違うんだ？
ふくろう
糖尿病ははじめのうち、痛みなどの自覚症状がないんだ。だから、検査で血糖値が高かったり、治療が必要といわれたことがあっても、そのまま治療を受けない人が多いんだろうね。
うさぎ
糖尿病で死んじゃう人は？
ふくろう
年間で1万人くらい（平成12年人口動態統計）いるよ。もうひとつの大きな問題は、合併症だね。糖尿病による腎臓障害で人工透析を始める人は、年間1万人以上もいるし、糖尿病が原因の視覚障害の発生も年間約3,000人もいるからね。

糖尿病の人のなかには、食の楽しみを奪われることを恐れて食餌療法をなかなか実行できない人がいる。しかし、食餌療法を勧める側が、その療法でどれだけ食べてよいかあるいは本人が実際にはどれだけ摂食しているのかあまり実感していないこともあるかもしれない。糖尿病で食事をカウントするのに、１単位80kcalとして、

をバランス良く組み合わせて(1600kcal=11:1:4:1.5:1:1など)摂取する方法がとられているが、あまりなじみがないかもしれない。記憶力のいい人で、昔の小学校の給食の時間を覚えている人は、献立表に上の六群の分類が載っていたのを覚えているかもしれない。自分の通っていた小学校には、専任の栄養士さんが配属されており、地域の食材の手配やおいしく食べる方法をみんなに教えて下さったり、栄養をどのように取るべきかについてのプリントを配って下さったりと、様々な仕事をなさっていたのを覚えている。

今回は、病院にあるレストランで提供されている糖尿病特別食を試してみた。上に掲げてある写真がそれである。良く読めない部分は以下の通りである。

以上の記述は非常に興味深い。和食は糖質が多く、蛋白、脂肪が低い、いわゆる「淡白」な食事であるのにたいし、洋食は脂肪分が非常にたかく、中華は塩分がかなり多いということがわかる。和食は健康によいといわれているのもうなずける。ここでもう一度献立を見てみると、野菜と魚介類の多さに気づく。先に挙げた六分類のうち、最後の六群はカロリーが大変低く、食欲が満たされない時は六群をたくさん食べるということになっており、和食では自然と糖尿病食を実行していることになるのだ。

最後に、自分にとって糖尿病食は少し物足りなかったということを付け足しておきたいと思う。

      <krang>  Hey all, what's the best way to call one perl script from
               another? I was thinking I'd just use 'system("script.pl");'
    <dazjorz>  krang: yeah, that, or do "script.pl"
    <dazjorz>  krang: depends on how seperated you want them to be
      <krang>  dazjorz: you mean just a line that has "script.pl"; written
               on it?
   <Khisanth>  you need the do as well
    <dazjorz>  krang: no, exactly this: do "script.pl";
    <rindolf>  krang: system is usually what you want.
    <rindolf>  krang: normally require or use are preferable to do
    <dazjorz>  rindolf: that's for modules, isn't it ?
    <rindolf>  dazjorz: yes.
    <dazjorz>  wait, I think require "script.pl" would work too
    <rindolf>  dazjorz: and doing code is not such a good idea.
    <dazjorz>  rindolf: hmm?
      <krang>  rindolf: what is doing anyway?
    <rindolf>  dazjorz: I mean "perldoc -f do"-ing code.
    <rindolf>  krang: do()-ing
    <rindolf>  krang: it reads the file and evaluates it.
    <rindolf>  krang: perldoc -f do.
    <dazjorz>  rindolf: ah
    <dazjorz>  rindolf: do {}
            *  rindolf would rather be doing hot models than doing code.
               :-)
    <dazjorz>  rindolf: yeah, do BLOCK is quite useless
    <dazjorz>  heh
    <rindolf>  dazjorz: you can do my $var = do { ... }
            *  dazjorz would rather be doing GumbyBRAIN than doing code
 <GumbyBRAIN>  and doing code is not be in the days of immortality!
    <rindolf>  dazjorz: or eval { ... }
    <rindolf>  dazjorz: heh.
    <rindolf>  It's hard to do code.
    <dazjorz>  do $model;
    <dazjorz>  eh.. sorry, do $hotmodel;
    <rindolf>  "Are you into my brother?"
    <rindolf>  "No I'm totally into Perl."
      <krang>  ah ok, I see. Thanks guys!
    <rindolf>  krang: yw.
    <dazjorz>  heh :-)
    <rindolf>  If you want a configuration file, you should be using
               something like INI, YAML, etc.
    <rindolf>  XML perhaps.
    <rindolf>  Something.
    <rindolf>  Apache-like config.
    <dazjorz>  Apache-like is very strong but hard to parse, right ?
    <dazjorz>  Loading and saving configuration never looks good,
               especially when it's XML
    <dazjorz>  the code to load and save is ugly.

    -- Sextalk among Perl cultists
    -- #perl, Freenode

"My name is Inigo Montoya. You forced my father to write XSLT. Prepare to die!
And be thankful I don't force you to write XSLT."

    -- Shlomi Fish
    -- XSLT Facts by Shlomi Fish and Friends ( http://www.shlomifish.org/humour/bits/facts/XSLT/ )

[ Main Page ]