猫は肉食動物なので、炭水化物は必要ない。
しかし、キャットフードには炭水化物が40-50％も含まれている。

これが原因で、消化機能の低下（下痢、嘔吐、鼓腸等）や高血糖を引き起こし、肥満猫になる。
そして猫の糖尿病が増えている。

通常のキャットフードの猫の平均寿命は、15年。
動物性タンパク質食の猫の平均寿命は、20年。

というわけで、ファイル入出力のサブルーチンを使ってシンプルなCMSを作ってみました。
ログイン機能は無しで、誰でも更新できるタイプですが、とりあえずはお勉強用ということで。
100行未満で作れる！ってのが素敵ポイント。

ファイルのダウンロード：cmsbase

perlでファイルの入出力に、いちいちopenって書くのがめんどくさいので、サブルーチンにしました。
誰かが同じ事やってないかと探してみたんだけど、意外となかった！
たぶん、この方法はメモリー食うとか、処理速度が遅いとか、そんな感じでみんなやらないのかな。
でも、入出力を１行で書けるのは快適だし、ソースコードもコンパクトで読みやすくなるので、お気に入り。

って、なかなか無いですよね。
仕事柄、PerlでCMSを作ってたりするんですが、それをそのまま公開するわけにもいかないし。
そこで、このNoteを公開しようかと思ったら、もう結構古くて、XHTMLだし、HTML5に直すのもメンドクサイし。。。

FCKeditorいいっすね！

この自作ブログにもつけてみました。

設置に丸1日掛かりましたけど。。。