use foo;
...
    my $foo = Foo->new;