foreach (@output) {
  print "$_\n" ;
  }