將數組保存爲純文本文件的問題

Question

我已經構建了一個數組，例如A = [a1，a2，... aN]。如何將此數組保存到數據文件中，並將每個元素放置在一行中。換句話說，爲陣列，該文件應該

a1 
a2 
a3 
... 

Answer 1

很簡單（這是假設，當然，你的陣列被明確指定爲一個數組，你的問題完全不是那麼回事明確）：

#!/usr/bin/perl -w 
use strict; 

my @a = (1, 2, 3); # The array we want to save 

# Open a file named "output.txt"; die if there's an error 
open my $fh, '>', "output.txt" or die "Cannot open output.txt: $!"; 

# Loop over the array 
foreach (@a) 
{ 
    print $fh "$_\n"; # Print each entry in our array to the file 
} 
close $fh; # Not necessary, but nice to do 

以上腳本將寫入以下爲 「output.txt的」：

1 
2 
3 

Answer 2

如果你不想foreach循環，你可以這樣做：

print $fh join ("\n", @a);