in reply to Modules for building friendly CLI scripts?

Term::Complete
@words = qw (err human forgive divine); $input = Complete('Enter word',\@words);