POPFile(自動メールフィルター)の日本語化

rei0 さんが本家にパッチとして投稿されている APOP 対応パッチ
http://sourceforge.net/tracker/index.php?func=detail&aid=913349&group_id=63137&atid=502958
を試してみました。

といっても、私は APOP 対応のアカウントを所有していないので、パッチを
適用したあと、普通に POP3 でメールを受信しただけです。

すると、メールをチェックした際、コンソールに
Use of uninitialized value in pattern match (m//) at /Proxy/POP3.pm line 220, <GEN4> line 1.
というメッセージが表示されました。
これは、
{ $self->{useAPOP} = $6 =~ /apop/i; } # protect backreferences
という箇所で、この前の比較
my $user_command = 'USER ([^:]+)(:(?d+))?' . $self->config_( 'separator' ) . '([^:]+)(:([^:]+))?';
において、$6 が undefined にために起こっているのではないかと思います。

動作には支障のないことですが、気になったので投稿させていただきました。

＃本家パッチのところに投稿した方がよかったでしょうか（汗）