while (($i <= 4) and ($_ = <>))

##</code><code>##

  while (($i <= 4) and defined ($_ = <>))