我想使用 perl 将两个文件合二为一。进一步来说：
我有一个包含列的 txt 文件：
Irrelevant / Key / Various1 / ... / Various N
和第二个带有列的txt文件：
Key / Price
我想阅读这两个文件并加入它们，以便我拥有：
Key / Various1 / ... / Various N / Price
对于第一个表的所有行。我该怎么做？我的经验很少。
我需要一个表（哈希？），然后我可以在我的脚本中进一步处理，或者一个新文件，然后我可以读取并执行其余的过程。
任何帮助将不胜感激。
谢谢你的讽刺......我已经说过我没有经验，我不知道ahshes是如何工作的，这似乎是解决方案......我找到了这段代码并尝试使用它，但它不起作用：
我像这样加载第一个文件： $list{$file}{$system}{$master_file_name}{$symbol}=$price;
第二个：$map{$file} = $charge;
我加入他们：%combined = (%map, %list);
foreach my $system (keys(%combined))
{
my $n=0;
my $i=0;
my $workbook = Spreadsheet::WriteExcel->new("system.xls");
my $worksheet = $workbook->add_worksheet("summary_unmapped_master_file");
map{$worksheet->write($n, $i++,$_)} ("list", "charge", "System", "MAster_file", "symbol", "price");
$n++;$i=0;
foreach my $value (sort{$combined{$system}{$b} <=> $combined{$system}{$a}} keys %{$combined{$system}})
{
map{$worksheet->write($n, $i++,$_)} ($value,$list{$system}{$value});
$n++;$i=0;
}
}