投げやりなタイトル（笑） package A; use strict; use warnings; sub new{ my $class = shift; $class = ref $class || $class; return bless({}, $class); } sub f1{ my $self = shift; f2(); $self->f2(); } sub f2{ print "package A\n"; } package A::S…

みりょくをさいはっけんしたちょくごについったーとか。えありーふぇありーのへれんはさいこうでした、といいたいがちょくせついえないじれんま。こういうときはどうやってほめればいいんだろうなあ。あにめかしないかなあ。しないだろうなあ。

大量のMP3ファイル（１万ファイル程度）があって、一括でタグを付けたい。が、WindowsではGUIのツールしかないので、すごくめんどくさい。 CUIで処理するには色々方法がありそうですが・・・MP3::Tagというpure perlで実装されたID3タグ編集モジュールがある…

我が家の±0の加湿器（初代）のポット部分に水垢が付いて大変なことになってるので、掃除しようかと。市販のポット洗浄剤でもいいんだけど、加湿器のポットはサイズが小さいから合わないだろうし・・・と言うことで、クエン酸を使ってみる。ちなみにver3から…