$ perl -MModule::Build -e 'Module::Build->prompt("are you there","Y")'
are you there [Y] 
Y