Help for this page
package Foo; ... } 1;
#!/usr/bin/perl -w ... use Bar; $_->do_something()->() for (new Foo, new Bar);