perl的问题，求解呀

qinmin23

我有一个这样的数据文件1，要求把第一行的id删除
probeset_id AFFX-SP-000001 AFFX-SP-000002 AFFX-SP-000003 AFFX-SP-000004 AFFX-SP-000005 AFFX-SP-000006 AFFX-SP-000007 AFFX-SP-000008 AFFX-SP-000009 AFFX-SP-000010 AFFX-SP-000011AFFX-SP-000012 AFFX-SP-000013 AFFX-SP-000014
XN_170267A_SY01_P1_A01_CD38_170410.CEL_call_code GG CC CC CC CC CG CG 00 CG CG CG CG GG CC
XN_170267A_SY01_P1_A02_CD113_170410.CEL_call_code CC GG CG CC CG CG CC GG CC CG CC GG GG CC
XN_170267A_SY01_P1_A03_CD427_170410.CEL_call_code GG CG CG CC CG CC CC GG GG CG CG CG CG CG
XN_170267A_SY01_P1_A04_CD461_170410.CEL_call_code CC CG GG GG CG CG CG CG CC CC CG CG CG CC
XN_170267A_SY01_P1_A05_CD524_170410.CEL_call_code CG CG CG CC CC CC CC CC GG CG CG GG CC CC
XN_170267A_SY01_P1_A06_CD550_170410.CEL_call_code GG CC GG CG CG CG CC GG CC CG CC GG CG CC
XN_170267A_SY01_P1_A07_CD604_170410.CEL_call_code GG CC CC CG CG CC CG CG CG CG CG GG GG CG
XN_170267A_SY01_P1_A08_CD876_170410.CEL_call_code CC GG CC CC CG CC CC 00 GG CG CC CC CG CG
XN_170267A_SY01_P1_A09_CD1051_170410.CEL_call_code CG CG GG CC GG CC CC CC GG CC GG GG CG CC
然后将另一个文件2的内容按照序列将内容写入这个修改后的文件，文件2是这样的，ID        phenoCD113        0.05CD461        0.01CD550        0.05CD604        0.08CD876        0.1CD1051        0.09CD524        0.03CD427        0.04CD38        0.01