Cache::Memcached のソースを見てて、知らない my の使い方をしてるのを見つけた。 sub new { my Cache::Memcached $self = shift; $self = fields::new( $self ) unless ref $self; fields.pm を使うとこう書けるようで。ググればいくらでも出る上に perldo…