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