$\ = "\n"; # puts a \n after each print print for @lines;