使用PERL语言合并CSV文件问题，请高手帮忙

使用PERL语言合并CSV文件问题，请高手帮忙
有a.csv文件和b.csv文件
a.csv中有ID, BASIC_INFO, DATE, UPDATE字段
b.csv中有ID, STATIC_INFO字段
根据ID合并a.csv文件和b.csv文件为c.csv文件。

在BASIC_INFO字段，STATIC_INFO字段中包含换行符

我先在不知道怎么实现合并，请高手帮忙[CCB]10[/CCB]

用正则表达式。找出你所要.
用正则表达式。找出你所要匹配的模式 然后写入到一个文件中。
#! /usr/bin/perl
open(RD,"/home/xiaoye/word")or die "sorry not open $!";
open(WD,">>/home/xiaoye/num");
$word=<RD>;
if($word=~/(ID\S+)/){
print $1;
print RD $1;

}

   

谢谢
谢谢，很简单的方法