2009-01-21から1日間の記事一覧
いまのところ連敗。布団に入る時間が12時を越える日が一週間に一回に抑えたい。
クラスがコロコロ変化するというのをやってみたかったのでやってみた。 use warnings; use strict; { package Alphabet; sub new { bless {}, (shift); } sub next { my $self = shift; my $l = $self->letter; bless $self, ++$l; } sub prev { my $self = …