m6 BLOG

Your system appears to have shut down uncleanly
Press Y within 3 seconds to force file system integrity check...
Checking root filesystem


/dev/VolGroup00/LogVol00: UNEXPECTED INCONSISTENCY; RUN fsck MANUALLY.
        (i.e., without -a or -p options )
                                                           [FAILED]

*** An error occurred during the file system check.
*** Dropping you to a shell; the system will reboot
*** when you leave the shell.
Give root password for maintenance
(or type Control-D for normal startup):

(Repair filesystem) 1 # fsck -y /dev/VolGroup00/LogVol00　#-yは自動でyesを選択

ネットワーク設定：vi /etc/sysconfig/network-scripts/ifcfg-eth0
ネットワーク再起動：service network restart

MTには標準でスパムフィルタがあるようで、今までそれで別に不満もなく放っておいてんですが、
気付けば迷惑コメントが2000件近く保存されてた(笑)。ま、それでも別に無視してたんですけど。
しかし最近それをすり抜けてくるスパムが多くなってきて、携帯が鳴る鳴る。
携帯嫌いになりそうなので、MT-Keystrokesプラグインを入れました。
これを導入すると、投稿ボタンを押さない限りコメントが投稿されないとのこと。
確かにロボットは直接cgiの方にポストするらしいから、結構いいのかも。
読みづら～い画像認証（←地味に嫌い）とかいらないから、コメントする人も負荷ないし。
ま、一切来ないんですけど笑

因みにほぼ毎日来てたスパムが、入れてから今日まで約1週間、皆無です。

もし、自分もスパムがウザいですって人がいたら、
インストールは終わってますが、個別にテンプレートの修正が必要ですので、
Milano::Monologさん（の、2. エントリー･アーカイブのテンプレートを修正から）などを参考にしつつやってみて下さい。

• POPFile
　Perl で書かれたベイジアンスパムフィルタ
• bsfilter
　Ruby で書かれたベイジアンスパムフィルタ 　spamか否かを判定。GUIを持たないため、コマンドラインから操作。
• Bogofilter
　C で書かれたベイジアンスパムフィルタ 　spamか否かを判定
• spamassassin
　spamか否かを判定

print '私は'
sleep 1
print 15
sleep 1
print '歳です。'
-----------------------------------------------------------------------------------------
このサンプルを実行すると
「私は」「15」「歳です。」とそれぞれの文字列が 1 秒おきに表示されます。
 sleep 1 の部分でプログラムの流れが 1 秒間止まっているのがわかると思います。
このようにプログラムは上から一行ずつ順番に実行されていきます。

STDOUT.sync = true

#! /usr/bin/perl

use MIME::Base64;
use Jcode;


$from = 'test@test.test';
$to = 'nanchara@nanchara.nanchara';
$subject = 'テストメールの件名です';
$body = 'テストメールの本文です';

# 件名を MIME エンコード
$encoded_subject = "=?utf-8?B?" . encode_base64($subject,"") . "?=";

# 本文を JIS 変換
$encoded_body = Jcode::convert($body, 'jis');


open(SENDMAIL,"|/usr/sbin/sendmail -t $from $to") || die 'error';
	print SENDMAIL "From: $from\n";
	print SENDMAIL "To: $to\n";
	print SENDMAIL "Subject: $encoded_subject\n";
	print SENDMAIL "MIME-Version: 1.0\n";
	print SENDMAIL "Content-Type: text/plain; charset=iso-2022-jp\n";
	print SENDMAIL "Content-Transfer-Encoding: 7bit\n";
	print SENDMAIL "\n";
	print SENDMAIL "$encoded_body\n";
close(SENDMAIL);

use MIME::Base64;

$subject="メールタイトル";
$encoded_subject = encode_base64($subject);

Subject : 44Oh44O844Or44K/44Kk44OI44Or

$subject="メールタイトル";
$encoded_subject = encode_base64($subject);
$mail_subject = "=?utf-8?B?" . $encoded_subject . "?=";

返されるエンコードされた文字列は76文字を越えないように分割され、
空文字列でなければ$eolが最後に付きます。
もしエンコードされた文字列を複数の行に分割したくない場合は、
2番目の引数として空白の文字列を渡してください。

$subject="メールタイトル";
$encoded_subject  = encode_base64($subject, "");
$mailsubject = "=?utf-8?B?" . $encoded_subject . "?=";

もう半年経つんですね！早すぎ！
最近めっきり寒くなったので，皆様風邪などひかぬようお気をつけ下さい。

▼9月にやったこと
・メール配信スクリプトの仕上げ
・文字コード変換
　　⇒EUC-JPからUTF-8へ。
　　　BUT...「POPFileのUIでは文字コードにEUC-JPを利用」との事で文字化け発生。
　　　でも，メール自体には影響が無いとのことなので我慢して使う。
　　⇒メールの本文の方のニュース名が「???????」と出る事がある。
・POPFileのトレーニング
・10/1のプレゼン準備

▼これからやること
・「??????」の解決
　（※追記：MIMEの問題。mime_plsによって解決できる）
・ラベルを複数付けられるかの検討
　（POPFileを二つ通せるか？）
・引き続きトレーニング