while($picks = <STDIN>) {
  chomp($picks);

  # do stuff
}