BEGIN {
    my $LOAD_FOO = 1;
    eval "use Foo; 1;" or die $@ if $LOAD_FOO;
}