my $foo = Foo->new qw( Foo::Bar Foo::Baz );