学習機能オフでとりあえず、仮復帰。 α版の頃の会話内容を、β版の学習機能を使って再学習させてあります。Perl MSNモジュールは(・∀・)イイ!!Memo:【Perl】MSN Messengerプログラミング を参考にしました。以下一部ソース晒し #!/usr/local/bin/perl package…

CPANが使えないような環境で、ゲッターセッターをセットで作りたい。 でも、いくつも sub set_hoge{ my $self = shift; $self->{'hoge'} = shift; } sub get_hoge{ my $self = shift; return $self->{'hoge'}; } とか書くの苦痛。で、適当に簡易アクセサメソ…