if (eval "use Module::Foo") {
     # I've got foo!
  } else {
     die $@ if $@;
  }