use constant Object => 'Foo::Bar::Object'; print ref Object->new();