output("Sorry, invalid option\n\n")
  until
    ask('database','Database type?', 'mysql'),
    grep getConf('databasetype') eq $_, @databases;