my $x = Object::new(); #### my $x = 'Object'->new; #### sub new { bless {}, shift }