Help for this page

Select Code to Download

Select or download this

while (1) {
   print "list of letters: ";
...

   # Do something with $line.
}