[russkii] Здравствуйте!

lang-8.comというwebサービスに登録したので、ロシア語で簡単な自己紹介文を書いてみた。

Здравствуйте! [Lang-8]

「簡単な」とは言うものの、オイラには非常に難しい内容でしたっと。
うう。もう少し集中して勉強しないとね。

[Perl]cpanでのモジュールインストールを手っ取り早く自動化したい

単純に目的のCPANモジュールをインストールしたいけど、依存モジュールのインストールで[Yes/no]を聞いてくるのってありますよね。
依存モジュールが少ないうちはまあ、enter押したりして対応するんですけど、これが沢山になると、ぶっちゃけイヤになります。
# 特にCatalystとか。
そんな時には、

# echo | cpan Any::Module

としてあげると、勝手にデフォルトの選択肢を選びつつ、取り急ぎインストールまで漕ぎ着けてくれます。
# あ。Any::Module は、インストールしたいモジュール名に置き換えて下さいね？

ああ！これで一安心。

…でも、手放しでマシンに任せっ切りでは、うまくインストールできなかった時に心配ですよね。どの選択肢が選ばれたのか。どんな原因でうまくインストールできなかったのか。etc...

そしたら、こうするといんでないかい？

# echo | cpan Any::Module 2>&1 | tee cpan_install.log

インストールのログが、cpan_install.logに送りこまれます。これで大分インストールで楽できますね。

4/6 追記
同じ目的なら、cpanminusを使った方がより近代的です。
こちらの記事も見てくださいね。

[Perl]Data::ModelでPrimary Keyが複数あるテーブルにレコードを追加したい

これでOK

my $model = MyModel->new;
$model->set( 'multiple_prikey_table' => { 
    prikey1 => 'ID-A-001', 
    prikey2 => 'ID-B-002',
    data1 => 1234,
} );

[Perl]Encode.pm使ってメールの件名に日本語を使う場合のメモ

ど忘れしてたので、メモ。

use Encode;
my $subject = encode( 
    'MIME-Header-ISO_2022_JP', 
    decode( 'utf8', 'ヤムチャの目にも涙：意味）ヤムチャは死ぬ。' ) 
);

# ヤバいくらいに脳が退化してる気がする。。。