{
  local $" = "\n";
  print "@array";
}
[download]

or:

print join("\n", @array);
[download]

--Bob Niederman, http://bob-n.com

All code given here is UNTESTED unless otherwise stated.