while (<STDIN>) {
   print "Got a line: $_";
}