package Bar;
sub BEGIN {
   eval "use Bar" if $loaded_for_the_first_time;
   do_stuff();
}