$bar = Foo->new();
...
undef $bar;