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