$user_install_base = Module::Build->prompt("Where to install?","/usr/local");
  Module::Build->new(
    ...
    install_base => $user_install_base,
    ...
  );