local $_;
do {
    do {
        print "> ";
        chomp( $_= <STDIN> );
    } until(  /\S/  );
} until(  'FALSE' eq cmd_select( split ' ' )  );