Làm cách nào để in các phần tử danh sách được phân tách bằng nguồn cấp dữ liệu dòng trong Perl?

Question

Cách dễ nhất để in tất cả các phần tử của danh sách được phân tách bằng nguồn cấp dữ liệu dòng trong Perl là gì?

Answer 1

print "$_\n" for @list; 

Trong Perl 5.10:

say for @list; 

Một cách khác:

print join("\n", @list), "\n"; 

Hoặc (5.10):

say join "\n", @list; 

Hoặc cách abo ut:

print map { "$_\n" } @list; 

Answer 2

print join "\n", @list; 

Answer 3

Tại sao không lạm dụng các biến toàn cục Perl thay vì

local $\ = "\n"; 
local $, = "\n"; 
print @array; 

Nếu bạn có hứng thú đối với suy biến không cần thiết thoải mái sử dụng phiên bản này để thay thế:

local $" = "\n"; 
print "@array\n";