2010-10-02から1日間の記事一覧

Perlでオブジェクト指向を復習中

ところで my $counter = {"value" => 0}; print "$counter\n"; # HASH(0x1008001f0) bless $counter, Counter; print "$counter\n"; # Counter=HASH(0x1008001f0) てなことをやるとuse strict時には「Bareword "Counter" not allowed」って言われる。bless $…