use test::object; my $x='object'; my $y=test::.$x->new();