http://www.perlmonks.org?node_id=1064369


in reply to RFC extending Benchmark.pm to facilitate CODEHASHREF

use Attribute::Benchmark;

sub name1 :Benchmark { 
   ...
}

sub name2 :Benchmark { 
   ...
}

[download]

That is all.

use Moops; class Cow :rw { has name => (default => 'Ermintrude') }; say Cow->new->name

In Section Meditations