2008年06月28日05:00 カテゴリLightweight Languages perl - Attribute::Constant - Another Way to Make Read-only Variables Constに物言いがついたので、ちょっと趣向を変えて。 /lang/perl/Attribute-Constant/trunk - CodeRepos::Share - Trac @CPAN (coming soon) dlock()をData::Lockとして分離し、それを使ってAttributeでRead-onlyを実現しています。 Source かのごとく短し。lvalueと三項演算子で遊んでます。Pure Perlです。PODはsignatureの後。 Data::Lock package Data::Lock; use 5.008001; use warnin