$ perl -MO=Deparse -e 'readline(STDIN)' readline 'STDIN'; -e syntax OK