Help for this page
package mod; sub foo{ ... } 1;
eval "use mod"; mod::foo();
eval "use mod"; die $@ if $@; mod::foo();