while (<COUNT>){
  ($i, $j) = ...