eval{require "foo.pl"};
$@ && die $@;