Select Code to Download

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

package MyClass    { sub new { bless []=>shift } }
package OtherClass { sub new { bless []=>shift } }
...
   my $object = MyClass->new;
   print ref $object;
}

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