my $use_readkey;
BEGIN {
   $use_readkey = eval { require Term::ReadKey };
}