$ perl -MTerm::ReadLine -e 'print Term::ReadLine->new("")->ReadLine()'
Term::ReadLine::Gnu