Select Code to Download

use Benchmark qw(cmpthese);

package Example {
...
          magic  => sub { ${ref($obj) . '::'}{'method'}->($obj) },
         }
);

            Rate  magic    can    ref    var direct
magic  3495252/s     --    -0%   -37%   -41%   -58%
...
ref    5518821/s    58%    57%     --    -6%   -34%
var    5887725/s    68%    68%     7%     --   -29%
direct 8340945/s   139%   138%    51%    42%     --