use Benchmark;

sub new { bless \@_, $_[0] }

timethese(100_000, {
	bareword  => sub { eval q{ main->new } },
	quoted    => sub { eval q{ 'main'->new } },
	colons    => sub { eval q{ main::->new } },
});