Help for this page
package Bar warn "blaah"; sub bar { } use interface Foo; 1
package Bar; sub BEGIN { eval "use Bar" if $loaded_for_the_first_time; do_stuff(); }
# Foo.pm use Bar; # Bar.pm use Foo;