perl -MTerm::ReadLine -e 1
perl -MTerm::ReadKey -e 1