[新人提问] Perl 合并CSV 文件数据

源文件格式如下  
table  A  
lable                    number             unitprice          Location
gate:man                     135                     50                 HAF
door:keeper             135                     30                 LABB
apple:number             135                     2                   TODDDDD
flower:color          135                     2                   CSFF  
other:man            135                     2                   DAFDS
baby:face             135                     1                   BSFDSA

B表格式相似
随便瞎编点数据就对，


读取N个CSV文件，在每个表中提取lable列 和unitprice列，
最后合并成的格式为

lable                         Location                Location(B表中的数据)  Location(表N)
gate:man                         HAF                        FDSFDS
door:keeper                 LABB                SDFFDS
apple:number                 TODDDDD        FDS
flower:color                  CSFF                  DF
other:man                  DAFDS                BCFDS
baby:face                    BSFDSA                GDVC

然后将次结果保存到一个新的CSV文件中。
我自己合并下来的表巨丑无比，只能顺着往下排，并不能排成一列，谢谢大神们的帮助！最好带点注释啥的，我好弄清楚原理。记住是从CSV中读，然后存到新CSV中

晕死。。没对齐。。应该是对齐的哈。。。