如何使用Perl將哈希（鍵作為列名，值作為行）寫入制表符分隔的文件中？

Question

假設我有這樣的哈希內容：

{
    'Name' => 'Jhon',
    'Roll No.' => '911',
    'Address' => 'CA',
    'City' => 'California', 
},
{
    'Name' => 'Jeff',
    'Roll No.' => '922',
    'Address' => 'CA',
    'City' => 'California', 
},

我想要這樣的輸出：

Name    Roll No.    Address    City
Jhon    911    CA    California
Jeff    922    CA    California

在不使用任何perl模塊的情況下，像這樣編寫csv的最簡單方法是什么？

Answer 1

您可以使用哈希切片來使哈希值保持順序，

my @keys = ("Name", "Roll No.", "Address", "City");

print join("\t", @keys), "\n";
for my $v (@AoH) {

  print join("\t", @$v{@keys}), "\n";
}