perl -MIO::Prompter -e'prompt -menu => [6..9]'