for ($i=0, @chunk = (); !eof(IN) && $i < 10; $i++) {
   $chunk[$i] = <IN>;
}