2008/8/28 MrBiTS <mrbits em linuxmasters.info>: > <code> > #!/usr/bin/perl > > use overload q(<) => sub {}; > use Benchmark qw(timethese); > > sub test { > $h; > $h = bless [ ] => 'main'; > } > > timethese(1E6, { 'tempo' => \&test }); > </code> O seu teste está incorreto pois não utiliza overload em momento algum. -- edenc.vox.com