Help for this page
#!/usr/bin/perl ... } 1;
#!/usr/bin/perl ... $x->aaa(); #$x is now an object of type foo::bar $x->bbb(2);