my $object = MyClass->new;
my $object = new MyClass;

##</code><code>##

package MyClass    { sub new { bless []=>shift } }
package OtherClass { sub new { bless []=>shift } }
package main
{
   sub MyClass () { return 'OtherClass' }
   my $object = MyClass->new;
   print ref $object;
}

##</code><code>##

my $object = MyClass::->new;
my $object = 'MyClass'->new;
my $class = 'MyClass'; my $object = $class->new;