my $obj = Foo::Bar->new;